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1 . INTRODUCTION  AND  SUMMARY 

The  U.  S.  Naval  Surface  Weapons  Center  - Dahlgren  Laboratory  is  developing 
the  technology  base  required  to  enhance  the  cost-effectiveness  of  preventing  Navy 
electronic  systems  from  being  vulnerable  to  high  power  electromagnetic  environ- 
ments. One  aspect  of  this  program  is  the  improvement  and  extension  of  MIL-STD-1377 

(Navy)  (Reference  1).  MIL-STD-1377  (Navy)  presents  a method  for  measuring  shield-  ! 

I 

ing  effectiveness  of  aerospace  cables  and  enclosures,  and  the  possible  extensions  1 

I 

of  the  concept  include  active  system  susceptibility  testing  (Reference  2).  j 

The  basic  high  frequency  (greater  than  one  gigahertz)  concept  of  MIL-STD-1377  | 

(Navy)  involves  placement  of  a test  sample  inside  a conductive  chamber,  the  | 

injection  of  an  electromagnetic  environment  into  the  chamber,  and  the  tuning  of 
this  environment  by  various  tuning  mechanisms.  See  Figure  1.  In  the  original 
version,  the  tuning  mechanism  included  a crossed  dipole  field  stirrer,  and  double  i 

stub  tuners  (or  equivalent)  on  the  input  and  output  lines.  In  operation,  the  | 

tuners  are  adjusted  to  obtain  a maximum  reading  on  the  test  sample  and  the  ! 

reference  antenna  (probably  at  different  tuning  positions),  and  the  ratio  of  the  ■ 

i 

received  power  is  taken  as  the  shielding  effectiveness  of  the  test  sample.  The 
technique  has  good  repeatability  (although  this  varies  with  operators)  and  has 
been  shown  to  correlate  well  with  anechoic  chamber  measurements.  Its  greatest 
drawback  is  the  relative  slowness  of  the  method. 

During  a previous  contracted  effort  (Reference  3),  MDAC-E  had  shown  that  an 
improved  field  stirrer  could  replace  the  crossed  dipoles,  and  that  use  of  this 
stirrer  in  rotation  only  produced  acceptable  results.  The  increase  in  measurement 
speed  permitted  far  more  cases  of  interest  to  be  studied  than  before  and  the 
derivation  of  a statistical  definition  of  shielding  effectiveness.  The  human 
factors  were  also  eliminated  and  computer-aided  measurements  became  feasible. 

1 
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■ EM  FIELD  “PADDLE  WHEEL"  TUNER 


FIGURE  1 ELECTROMAGNETIC  SUSCEPTIBILITY  TEST  SETUP 
The  new  tuner  left  much  to  be  desired  at  the  lower  frequencies  (one  to  two 

gigahertz)  where  there  were  rather  large  peak-tc-peak  excursions  in  transmission 
loss  over  small  frequency  increments.  There  is  no  clear  cut  criterion  for 
evaluating  the  effectiveness  of  the  stirring  mechanism,  but  it  "should"  be  able 
to  produce  a relatively  smooth  response  with  frequency.  It  is  possible  that  the 
uncertainty  of  any  measurement  made  in  the  chamber  is  related  to  the  magnitude  of 
the  peak-to-peak  variations. 

The  main  thrust  of  this  contracted  effort  was  to  design  and  test  improved 
antennas  and  field  stirrers,  and  to  investigate  the  free-field  pickup  properties 
of  typical  twisted  pair  cables  for  use  in  establishing  an  absolute  calibration 
method  for  the  chamber.  Matched  longwire  antennas  were  designed  and  validated 
for  a 3 X 3 X 5 foot  (91  x 91  x 152  cm)  chamber.  Design  equations  and  validation 
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procedures  are  described  to  permit  installation  of  the  improved  antennas  in  an 
arbitrary  chamber.  Several  paddlewheel  field  stirrers  and  implementation  schemes 


were  studied*  and  the  individual  results  were  compared  in  terms  of  mean  and 
standard  deviation  for  the  transmission  loss.  The  paddlewheel  stirrer  design 
process  was  empirical,  but  the  best  tuners  can  be  scaled  up  or  down  to  fit  an 
arbitrary  chamber  size.  The  impact  of  the  work  accomplished  during  this  contract 
can  be  briefly  summarized  by  reference  to  Figure  2,  which  illustrates  the  chamber 
transmission  loss  in  the  1.0  to  1.2  GHz  frequency  band  before  and  after  the  test 
configuration  improvements. 


1.000  1.025  1.050  1.075  IJOO  1.125  1.150  1.175  1.200 

FREQUENCY  - GHZ 

FIGURE  2 ILLUSTRATION  OF  TUNING  CONFIGURATION  IMPROVEMENTS 
(BOTTOM  LINE  - ORIGINAL  CONFIGURATION) 

(TOP  LINE  - COMBINED  EFFECT  OF  TUNING  IMPROVEMENTS 
INCLUDING  TWO  FIELD  TUNERS) 
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This  report  contains  representative  samples  of  the  data  obtained  which  are 
required  to  illustrate  significant  performance  improvements.  Complete  sets  of 
the  data  are  available  at  MDAC  and  NSWC  in  the  form  of  the  data  tapes  and  graphs. 
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2.  ANTENNA  DESIGN  AND  DEVELOPMENT 

The  performance  requirements  for  the  input  and  reference  antennas  in  the  EM 
test  chamber  are  the  same  as  for  any  input/output  coupling  loop  or  probe  in  a 
microwave  cavity.  The  coupling  device  must  couple  RF  energy  from  a coaxial  link 
into  the  cavity  and  establish  the  EM  field  with  minimum  loss  and  reflections  back 
to  the  source.  In  the  case  of  the  multi-mode  cavity,  the  long  wire  antenna  has 
been  found  to  be  an  efficient  coupling  device  for  a large  number  of  modes  which 
are  desirable  for  changing  thp  coupling  parameters  into  the  test  specimen. 
However,  to  maintain  efficient  coupling  and  matched  impedance  over  broadband 
frequencies,  it  is  necessary  to  maintain  careful  control  over  physical  dimensions 
of  the  long  wire  antenna.  This  is  verified  by  the  test  data  contained  in  this 
report. 

2.1  Antenna  Design  Concept 

Previous  work  in  MIL-STD-1377  type  EM  test  chambers  has  not  addressed  the 
antenna  design  problem  in  detail.  Instead,  a manual  tuning  procedure  matched  the 
antenna  impedance  at  the  selected  test  frequency.  Consideration  was  given  to  an 
automated  tuning  method  where  a computer  would  do  essentially  the  same  tuning 
procedure.  Trombone  tuning  stubs  would  be  driven  by  stepping  motors,  and  the 
resulting  changes  in  tuning  state  would  be  sensed  through  directional  couplers 
and  fed  back  to  the  computer.  Through  a series  of  iterations,  the  shunt  and 
series  tuning  elements  would  be  adjusted  for  optimum  impedance  matching  at  each 
test  frequency.  The  complexity  and  inherent  slowness  of  this  concept  led  us  to 
reject  the  idea  in  favor  of  broadband  impedance  matching  using  exponentially 
tapered  matching  lines. 

Broadband  antenna  matching  using  tapered  matching  sections  at  each  end  of 
the  antenna  reduces  the  number  of  design  problems.  The  antenna  and  matching 
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section  designs  are  based  on  background  information  found  in  references  (4) 
through  (9). 

The  antenna  impedance  is  approximated  by  the  equation  for  an  unbalanced 
transmission  line: 

= 138  log  ^ (1) 

where:  = characteristic  impedance 

h = antenna  spacing  from  wall 
d = antenna  diameter 

Actual  impedance  looking  into  the  antenna  installed  in  the  chamber  varies  from 
this  equation  depending  on  the  mode  of  coupling  to  the  reference  antenna  and 
frequency  of  operation.  The  coupling  modes  are  changed  by  the  stirring  mechanism; 
hence,  there  is  a different  antenna  impedance  for  each  of  the  possible  field  tuner 
positions.  However,  the  impedance  values  of  significance  are  the  ones  correspond- 
ing to  the  "minimum  transmission  loss"  field  tuner  position.  Manual  tests 
indicate  the  antenna  impedance  is  approximately  that  of  the  unbalanced  transmission 
line  when  modes  are  stirred  to  produce  maximum  coupling  to  the  reference  antenna. 
The  antenna  concept  is  similar  to  the  Beverage  or  Wave  Antenna,  as  described  in 
reference  (8).  To  maintain  a low  VSWR  over  a broad  frequency  band,  the  antenna 
must  be  terminated  in  its  characteristic  impedance  and  must  be  driven  from  a 
source  impedance  of  approximately  the  same  value.  The  major  difference  between 
the  Beverage  antenna  and  this  concept  is  that  a wave  propagated  in  one  hemisphere 
from  the  Beverage  antenna  has  no  reflections;  waves  leaving  the  antenna  in  the 
EM  chamber  are  subject  to  reflection  regardless  of  the  direction  of  propagation. 
However,  when  maximum  coupling  to  the  reference  antenna  is  achieved,  the  antenna 
impedance  is  approximately  that  of  a Beverage  antenna  and  is  approximately  defined 
by  the  transmission  line  equation.  The  effect  of  the  matched  antenna  in  the  EM 
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test  chamber  is  to  reduce  the  range  of  antenna  impedance  variations  such  that  the 
impedance  at  a particular  frequency  is  more  likely  to  be  within  the  tuning  range 
of  the  field  tuner.  Thus,  the  probability  that  minimum  transmission  loss  will  be 
attained  is  increased. 

2.2  Impedance  Matching  Concept 

A transmission  line  whose  impedance  varies  exponentially  along  its  length 
has  impedance  matching  capabilities  similar  to  an  exponential  horn.  Also,  it 
behaves  as  a high-pass  filter  whose  cutoff  frequency  depends  on  the  rate  of 
exponential  taper.  Such  a tapered  line  has  apparent  utility  in  matching  an 
antenna  to  a transmission  line  of  lower  characteristic  impedance.  References  (2) 
through  (7)  include  a collection  of  formulas  which  express  the  relation  of  the 
electrical  properties  of  the  exponential  line  to  the  mechanical  dimensions.  From 
reference  (5)  the  cutoff  frequency  is  given  by: 


f = 55  log  00  ^2) 

where:  f^  = cutoff  frequency  in  megahertz 
ZqI^  = impedance  of  the  load  end 
"00  " inipedance  of  the  source  end 
i = line  length  in  meters 

If  the  load  end  of  the  line  is  terminated  in  a load  then  for  frequencies 
much  greater  than  fc,  the  impedance  at  the  input  of  the  line  is  approximately  Zqq. 
As  the  frequency  is  decreased  toward  f^.,  increasing  deviations  occur  in  the  input 
impedance.  Per  reference  (4),  if  the  exponential  line  is  placed  between  constant- 
K low  pass  filter  sections  and  M-derived  half  sections,  it  is  possible  to  keep  the 
impedance  deviations  within  5 percent  of  the  required  value  for  all  frequencies 
15  percent  or  more  above  the  cutoff  frequency.  Where  it  is  desired  to  limit  the 
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length  of  the  exponential  line,  or  ''here  exact  matching  is  required,  such  termina- 
ting filter  sections  have  useful  applications.  However,  it  is  simpler  to  increase 
the  line  length  such  that  the  working  frequency  is  always  very  high  compared  to  the 
cutoff  frequency.  If  it  is  not  desired  to  use  filter  sections  at  the  line  termina-  | 

tions,  the  cutoff  frequency  must  be  considerably  lower  than  the  lowest  working  | 

frequency.  Where  impedance  deviations  of  10  percent  can  be  tolerated,  the  cutoff  j 

frequency  must  be  approximately  one  tenth  the  lowest  operating  frequency.  This  was  | 

the  approach  adopted  for  the  tapered  matching  line  design.  I 

The  design  frequency  band  of  the  test  chamber  was  1 to  10  GHz,  thereby  | 

indicating  cutoff  frequency  for  the  tapered  line  of  .1  GHz  or  less.  The  character-  j 

j 

istic  impedance  of  the  tapered  line  at  any  point  (x)  along  the  line  can  be  defined  | 

by  the  equation: 

Zqi 

^(x)  " ^00 

i/her$:  = impedance  at  position  (x) 

Zqq  = impedance  at  source  end 
ZqI^  = impedance  at  load  end 
n = length  of  the  line 

With  the  required  line  length  and  impedance  defined  by  equations  (2)  and  (3), 
it  is  only  necessary  to  determine  the  cross-sectional  dimensions  necessary  to 
provide  the  impedance  values  indicated  by  equation  (2).  From  the  various  trans- 
mission lire  configurations  possible,  the  microstrip  line  with  a single  ground 
plane  was  selected  as  the  most  practical  for  our  application. 

Wheeler's  work  (reference  7)  on  microstrip  lines  gives  a wide  strip  approxi- 
mation and  a narrow  strip  approximation.  These  equations  are  presented  in 
Appendix  A.  Preliminary  designs  indicated  that  the  tapered  lines  required  to  match 
the  antennas  in  the  EM  chamber  would  encompass  both  the  narrow  strip  line  and  the 

wide  strip  line  as  defined  by  Wheeler.  It  is  essential  to  avoid  discontinuities 

8 
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in  the  line,  so  interpolation  between  the  narrow  strip  and  wide  strip  approxima- 
tions was  necessary  in  the  overlap  program.  A program  was  written  for  a Hewlett 
Packard  desk  calculator  to  perform  the  microstrip  width  calculations.  A copy  of 
the  program  is  included  in  Appendix  B.  The  calculator  printout,  also  in 
Appendix  B,  provides  the  necessary  line  widths  at  selected  length  increments.  The 
resulting  cutoff  frequency  is  also  given.  Inputs  to  the  program  are  source 
impedance,  load  impedance,  dielectric  constant,  dielectric  thickness,  conductor 
thickness,  conductor  length,  and  selected  calculation  increments. 

2. 3 Practical  Considerations 

Although  the  equations  presented  can  adequately  define  the  electrical  require- 
ments of  the  antenna  and  matching  lines,  certain  physical  limitations  necessitate 
some  practical  design  selections.  Basic  antenna  dimensions  - diameter,  length,  and 
spacing  away  from  the  wall  - were  selected  for  good  performance,  consistent  with 
physical  constraints.  The  wire  diameter  must  be  large  enough  to  be  rigid  and  have 
a reasonable  characteristic  impedance  and  low  dissipation  losses,  yet  small  enough 
to  enable  attachment  to  the  microstrip  line.  Spacing  away  from  the  chamber  wall 
affects  characteristic  impedance  of  the  antenna,  wave  impedance  of  the  surrounding 
field  (E/H),  and  coupling  efficiency.  The  antenna  should  be  as  long  as  possible 
to  produce  maximum  radiation.  However,  the  physical  size  of  the  chamber  limits 
the  length  if  excessive  antenna  overlap  and  wave  interference  effects  are  to  be 
limited.  The  antenna  dimensions  selected  for  our  antenna  were  based  on  a compro- 
mise of  the  factors  mentioned.  The  antenna  is  a .125  inch  (3.175  mm)  diameter 
aluminum  wire  spaced  3 inches  (7.62  cm)  from  the  chamber  wall  and  is  zig-zagged 
across  a 3 x 5 foot  (0.91  x 1.52  m)  wall  and  extends  onto  two  3x3  foot 
(0.91  X 0.91  m)  walls  for  a total  length  of  approximately  11  feet  (3.35  m). 

Aluminum  was  chosen  because  its  electrical  properties  are  less  susceptible  to 

formation  of  metal  oxides  on  the  wire  surface,  unlike  copper  or  brass  and  their 
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oxides.  (The  difficult  soldering  problem  inherent  with  aluminum  has  been  solved 
by  using  high  temperature  solder  and  a special  flux  intended  for  use  with  aluminum. 
The  flux  and  solder  are  available  at  Sears,  Roebuck  and  Company  under  that  store's 
brand  name.)  The  wire  is  embedded  in  the  low  loss  polystyrene-based  plastic  foam 
to  maintain  the  spacing  from  the  wall.  The  dielectric  constant  of  the  material  is 
1.02  + .01  with  a dissipation  factor  below  .0002  over  the  operating  frequency 
range. 

The  length  of  the  microstrip  taper  was  also  determined  partly  by  practical 
limitations.  The  transition  between  antenna  and  tapered  line  must  be  physically 
smooth  to  avoid  electrical  discontinuities.  The  antenna  spacing  previously 
selected  indicates  that  the  microstrip  dielectric  thickness  should  be  about 
3 inches  (7.62  cm).  This  thickness  is  not  feasible  because  of  the  excessively 
wide  microstrip  line  and  discontinuity  which  would  appear  in  the  coaxial  to  micro- 
strip transition  at  the  source  end  of  the  microstrip.  A more  reasonable  selection 
for  the  microstrip  thickness  is  .125  inches  (3.175  mm)  which  is  available  in  low 
loss  dielectric-copper  laminates.  This  leaves  the  problem  of  transition  from  .125 
inch  (3.175  mm)  spacing  to  the  3 inch  (7.62  cm)  spacing.  The  problem  was  solved  by 
dividing  the  electrical  taper  into  two  tapers  which  are  physically  different. 

The  first  tapered  section  is  made  from  the  .125  inch  (3.175  mm)  copper  laminate. 

The  width  of  the  line  is  tapered  to  provide  the  required  impedance  matching.  The 
second  tapered  section  is  composed  of  the  aluminum  antenna  wire  of  constant 
diameter,  but  the  spacing  to  the  wall  is  tapered  to  provide  the  required  impedance 
matching.  The  rate  of  impedance  taper  is  the  same  for  both  sections  so  that 
electrically  it  is  one  continuously  tapered  line. 

The  length  of  the  taper  is  fixed  by  physical  constraints,  and  the  point  of 
transition  from  the  microstrip  taper  to  air  dielectric  taper  is  fixed  by  the  wire 
diameter  and  the  microstrip  dielectric  thickness.  The  air  dielectric  line  impedance 

at  the  transition  is  calculated  from  equation  (1). 

10 
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If  the  aluminum  wire  is  attached  directly  to  the  top  of  the  microstrip 
conductor: 

h = dielectric  thickness  + twice  conductor  thickness  + 1/2  wire  diameter. 
Substituting  selected  values 

h = .125  + 2 X .0014  + = .1903  inch  (4.831  mm) 

I therefore 

= 138  log  — = 108.27  ohms 

I The  microstrip  taper  is  then  designed  to  transform  the  50  ohm  input  impedance  to 

! 108.27  ohms.  The  lengths  of  each  tapered  section  must  be  a calculated  part  of  the 

total  length  so  as  to  maintain  the  impedance  taper  defined  by  equation  (3).  The 

i 

I total  physical  length  of  the  taper  was  selected  as  19  inches  (48.26  cm)  because 

I of  chamber  dimensions.  If  we  define  the  following  symbols: 

I 

= total  electrical  length  of  the  taper 
*,-1  = electrical  length  of  the  microstrip  taper 
Z2  = electrical  length  of  the  air  dielectric  taper 
L-j  = physical  length  of  the  microstrip 

= physical  length  of  the  air  dielectric  taper 
k = dielectric  constant  of  the  microstrip 

[ then: 

I L-j  + L2  = 19  inches  (48.26  cm) 

. =L 
^2  ‘-2 

= /k  = /275 
SLj  = + I2  = L]  + 1-2 

i ♦ From  equation  (1)  the  characteristic  impedance  of  the  antenna  is: 

1 

I Z^  = 138  log  ~ = 138  log  = 273.  55  ohms 

11 
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Thus  the  microstrip  taper  transforms  the  impedance  from  50  ohms  to  108.27  ohms,  and 
the  air  dielectric  taper  transforms  the  impedance  from  108.27  ohms  to  273.55  ohms. 

To  maintain  the  same  taper  rate,  the  total  taper  is  defined  by: 

2(x)  ■ “ 

and  3t  X = 

. 108.27  - 50  exp  ((l„2Z|j^)^) 

Solving  this  for  H-j  yields 

= .45462  ij 

Substituting  into  (4) 

■ 745461  " .45462  ''1  " ^ ''2 

Solving  for  L2: 

= 1.896769 

Then,  since  L-j  + L2  = 19  inches  (48.26  cm) 

L-j  = 6.56  inches  (16.66  cm) 

L2  = 12.44  inches  (31.60  cm) 

A photograph  of  the  tapered  line  installation  is  shown  in  Figure  3.  Both  ends  of 
each  antenna  are  matched  to  50  ohm  impedance.  The  taper  on  the  far  end  of  each 
antenna  is  terminated  with  a 50  ohm  coaxial  load.  Thus,  through  the  broadband 
tapered  line  impedance  transformer,  both  ends  of  the  antennas  are  terminated  in 
their  own  characteristic  impedance. 

2.4  Test  Results 

The  effect  of  the  tapered  line  impedance  transformer  on  antenna  input  impedance 
can  be  seen  by  reference  to  Figure  4,  reflection  coefficient  vs.  frequency  for  the 
minimum  loss  field  tuner  positions  only.  Comparison  of  the  before  and  after 

12 
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FIGURE  3 TOP:  TAPERED  LINE  INSTALLATION  IN  EM  CHAMBER,  SHOWING  ANTENNAS 
IN  LOW  LOSS  POLYSTYRENE  FOAM 

BOTTOM:  CLOSE-UP  OF  TAPERED  LINE  IMPEDANCE  MATCHING  CIRCUIT 
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conditions  shows  a considerable  improvement  in  antenna  impedance  after  the  tapered 
lines  were  installed.  Initially,  the  worst  case  reflection  coefficient  was  .9 
with  a mean  of  .48.  The  improved  antennas  show  a worst  case  of  about  .58  with  a 
mean  of  .27.  Converting  the  reflection  coefficients  to  equivalent  transmission 
loss  shows  that  the  worst  case  transmission  loss  has  been  reduced  from  7.2  dB  to 
1.6  dB,  for  an  improvement  of  5.6  dB.  This  agrees  with  manual  test  data  we  have 
taken  which  shows  that  most  improvement  attainable  by  manually  tuning  the  antenna 
impedance  has  been  a 5 to  6 dB  decrease  in  transmission  loss.  Some  improvement 
was  noted  on  the  higher  frequency  bands,  but  the  effectiveness  of  the  tapered  line 
transformer  was  not  as  great  since  the  antenna  impedance  match  was  initially  better 
at  the  higher  frequencies.  The  electrically  larger  antenna  length  and  spacing 
from  the  chamber  at  the  higher  frequencies  account  for  this  difference. 
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3.  FIELD  TUNER  IMPROVEMENTS 


Theoretically,  if  the  chamber  input  and  output  impedance  are  matched  to  the 
source  and  load  at  all  frequencies,  and  the  field  tuner  is  capable  of  adjusting 
input  to  output  coupling  such  that  polarization,  wave  direction,  and  impedance  are 
all  optimized  at  a particular  frequency,  the  output  level  should  depend  only  on 
the  dissipative  I R losses  within  the  chamber  and  antennas.  The  dissipative  loss 
function  is  expected  to  be  a relatively  smooth  curve  with  gradually  increasing 
loss  as  frequency  is  increased  due  to  skin  effect  on  the  chamber  wall.  Hence,  the 
total  transmission  curve  should,  in  the  limit,  approach  the  dissipative  loss 
curve  as  deficiencies  in  field  tuner  performance  and  antenna  impedance  matching 
and  other  error  sources  are  reduced  to  zero.  The  smoothness  of  the  transmission 
loss  curve  (described  by  standard  deviation  and  peak-to-peak  value)  is  thus  taken 
to  be  the  indicator  of  -^ield  tuner  relative  performance. 

All  testing  associated  with  the  investigation  of  field  tuning  improvements 
was  done  under  computer  control,  allowing  extensive  amounts  of  data  to  be  obtained 
and  analyzed.  Computer  generated  plots  were  used  to  evaluate  differences  in 
transmission  loss  curves  and  the  associated  statistical  data  for  the  many  tuning 
cases  examined.  A block  diagram  of  the  automated  system  is  shown  in  Figure  5. 

Flow  charts  and  printouts  of  the  many  computer  programs  developed  are  contained 
in  Appendix  D. 

3.1  Field  Tuner  Size  and  Shape 

Previously,  an  aluminum  field  tuner  was  used  as  a tuning  device  in  the  EM 
chamber.  It  consisted  of  two  flat  triangular  surfaces  attached  to  a rotating 
shaft  at  their  apexes.  The  bisector  of  the  apex  angle  of  each  triangle  lay  in 
the  plane  perpendicular  to  the  axis  of  the  attached  shaft,  180  degrees  apart  in 
the  plane.  The  plane  of  each  triangular  section  was  rotated  about  its  bisector 
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45  degrees  out  of  the  plane  perpendicular  to  the  shaft,  resulting  in  an  assembly 
with  an  appearance  much  like  the  blade  of  a fan. 

At  the  beginning  of  the  present  contract,  this  field  tuner,  shown  in 
Figure  6,  was  used  as  a reference  tuner  against  which  alternate  tuner  designs, 
in  conjunction  with  various  test  methods,  were  compared.  The  transmission  loss 
’ data  for  this  tuner  with  unmatched  antennas  (the  original  configuration)  for  the 

representative  frequency  bands  are  presented  in  Figures  7 and  8.  At  the  lower 
frequencies,  the  average  transmission  loss  is  5.7  dB,  with  a standard  deviation  of 
3.4  dB  and  a peak-to-peak  value  of  16  dB  in  the  1.0  to  1.2  GHz  range.  At  4.0  to 
4.2  GHz,  this  peak-to-peak  fluctuation  does  improve  to  about  8 dB,  and  the 
standard  deviation  is  much  less,  1.373.  However,  in  the  7.8  to  8.0  GHz  band, 
average  losses  are  higher,  indicating  that  more  power  is  absorbed  by  the  chamber 
walls  as  frequency  increases.  Major  tuning  developments  then  were  needed  in  the 
I lower  frequency  bands,  and  the  criteria  for  good  tuning  were  decreased  average 

transmission  loss  and  smallest  standard  deviation  possible,  with  its  attendant 
small  peak-to-peak  value.  Also,  a decrease  in  reflection  coefficient  would 
indicate  better  tuning,  particularly  as  a measure  of  matched  impedance  of  the 
I chamber. 

It  was  demonstrated  by  MDAC-E  in  an  earlier  contract  with  the  Navy  (Reference  3) 
that  rotation  of  a field  tuner  about  its  axis  is  sufficient  for  good  field  stirring. 
The  first  phase  of  testing  for  this  contract  was  concerned  with  field  tuning 
efficiency  as  a function  of  field  tuner  size  and  shape.  Up  to  this  time,  only  the 
original  field  tuner  had  been  used  in  EM  chamber  work.  Although  this  tuner  did 
eliminate  the  need  for  tuning  at  the  input  and  output  antenna  ports,  making 
manual  transmission  loss  measurements  less  complicated,  an  in-depth  study  of 
field  tuner  design  had  never  been  done.  Hence,  this  was  done  as  a first  step  to 
improved  field  tuning  in  the  EM  chamber. 

18 
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TWIST  45“  TO  GIVE  8"  (2(U2  cm)  LENGTH  AT  OUTSIDE  EDGE  ON  TWO 
PROJECTED  VIEWS  IN  PLANES  90“  FROM  EACH  OTHER. 


FIGURE  6 ORIGINAL  FIELD  TUNER 
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Figure  9 shows  the  field  tuners  tested.  The  outcome  of  the  field  tuner  size 
and  shape  investigation  was  that  the  large  and  small  bent  rectangles  were  able  to 
stir  the  fields  more  efficiently  than  other  tuners  of  their  respective  sizes. 

Figure  10  shows  the  two  bent  rectangles,  comparing  their  relative  sizes  and 
containing  a mechanical  drawing  of  their  dimensions. 

3. 2 Field  Tuner  Implementation 

Various  tuning  schemes  were  evaluated  using  the  tuners:  rotation  only, 
translation  only,  longitudinal  translation  and  rotation,  and  two  tuners  in  rotation. 
Each  of  these  was  done  with  and  without  matched  antennas. 

3.2.1  Rotation  Only 

Rotation  only  is  the  simplest,  hence  most  desirable,  tuning  technique.  All 
field  tuners  were  tested  in  rotation  only,  with  the  more  promising  used  with  the 
other  techniques  as  well. 

3.2.2  Longitudinal  Translation 

Some  manual  work  had  been  performed  which  involved  longitudinal  movement  of  the 
tuners  inside  the  chamber,  in  combination  with  rotation.  This  was  very  time 
consuming  because,  for  a given  input  power,  the  tuner  would  be  moved  longitudinally 
until  a peak  power  reading  at  the  output  of  the  chamber  was  found,  rotated  at  this 
longitudinal  position  for  a better  peak  reading,  and  then,  at  this  particular 
angular  position,  moved  again  longitudinally  to  obtain  better  power  transfer. 

This  process  would  be  reiterated  two  or  three  times,  and  the  best  peak  power 
obtained  at  the  output  taken  as  the  number  to  be  used  to  determine  the  transmission 
loss.  Test  time  with  this  manual  method  would  be  around  5 minutes  per  frequency, 
with  one  data  point  gathered  in  those  5 minutes.  This  test  method,  although  a 
valid  tuning  concept,  was  time  consuming  and  boring  for  the  individual  doing  the 
manual  testing.  Therefore,  during  this  contract  an  automated  test  method  was 
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developed  to  study  the  effects  of  longitudinal  translation  of  various  tuners, 
enabling  very  precise  positioning  of  the  tuner. 

An  integral  part  of  this  phase  of  testing  was  a special  longitudinal 
translating  mechanism  that  allows  about  6 inches  (15  cm)  of  travel  which  was 
designed  and  built  for  the  automated  system.  The  longitudinal  translator  is 
pictured  in  Figure  11  along  with  a mechanical  drawing.  The  rotational  stepper 
motor  is  mounted  on  a moving  carrier  with  the  shaft  of  the  field  tuner  coupled 
directly  to  the  shaft  of  the  motor.  This  assembly,  in  turn,  is  threaded  onto 
three  jack  screws,  each  having  a pulley  connected  by  a "no  slip"  belt  to  the 
longitudinal  stepper  motor.  As  this  second  motor  is  stepped,  the  three  jack 
screws  carry  the  field  tuner  motor  assembly  back  and  forth,  providing  longitudinal 
translation  of  the  tuner.  When  used  with  the  rotation  motor,  the  number  of 
test  points  vary  from  3000  to  4500,  depending  upon  the  test  frequency.  (The 
higher  the  frequency,  the  shorter  the  wavelength,  and  hence,  an  increased  number 
of  test  distances  in  15  cm.) 

3.3  Practical  Considerations 

The  practical  low  frequency  limit  of  the  EM  chamber  before  the  beginning  of 
this  contract  was  about  2.0  GHz,  with  fairly  good  stirring  at  frequencies  up  to 
10  GHz.  The  field  tuning  from  1.0  to  2.0  GHz  was  not  adequate,  and  it  was  felt 
by  MDAC-E  and  NSWC  that  tuning  improvements  in  all  bands  could  be  made  by  using 
techniques  discussed  above,  with  the  most  significant  progress  taking  place  at  the 
lower  frequencies.  Therefore,  four  frequency  bands,  each  200  MHz  wide,  were 
chosen  as  representative  samples  at  which  to  test  for  field  tuning  improvements. 

Two  of  the  bands,  1.0  to  1.2  GHz  and  1.8  to  2.0  GHz,  were  selected  to  observe 
effects  at  the  low  frequency  limit  of  the  EM  chamber,  since  room  for  the  most 
improvement  was  here.  The  other  two  bands,  4.0  to  4.2  GHz  and  7.8  to  8.0  GHz, 
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TOP:  LONGITUDINAL  TRANSLATOR  MOUNTED  ON  SIDE  OF  EM  CHAMBER 
BOTTOM:  MECHANICAL  DRAWING  OF  THE  DEVICE 
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FIGURE  11  LONGITUDINAL  AND  ROTATIONAL  STIRRING  MECHANISM 
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were  monitored  to  make  sure  nothing  untoward  was  happening  at  high  frequencies  as 
tuning  improvements  at  lower  frequencies  were  made. 

In  each  of  these  200  MHz  bands,  data  were  taken  at  every  1 MHz  (sometimes, 
every  2 MHz).  While  these  many  data  points  were  considered  necessary  in  developing 
good  tuning  techniques,  one  must  not  expect  to  have  to  test  a large  number  of 
frequencies  very  close  together  in  actual  shielding  effectiveness  or  EM  suscepti- 
bility tests,  particularly  when  good  tuning  has  been  demonstrated,  except  perhaps 
in  the  vicinity  of  resonant  frequencies  of  the  system  under  test. 

3.4  Test  Results 

The  field  tuner  improvements  were  evaluated  for  an  empty  chamber  and  for  a 
representative  piece  of  equipment  in  the  chamber.  A new  low  frequency  limit  for 
the  3x3x5  foot  (0.91  x 0.91  x 1.52  m)  chamber  was  identified  and  a discussion 
of  test  times  is  presented. 

3.4.1  Empty  Chamber 

Fourteen  tuning  configurations  were  evaluated  in  the  empty  chamber  for  field 
stirring  improvements.  The  results  are  summarized  in  Table  I,  where  they  are 
ranked  in  order  of  tuning  efficiencies.  In  general,  test  cases  with  impedance 
matched  antennas  surpassed  the  unmatched  cases,  and  those  test  schemes  that  used 
more  complex  tuning  implementations  had  lower  transmission  losses,  standard 
deviations,  and  peak-to-peak  values. 

Figure  12  is  an  example  of  the  data  from  which  the  statistics  in  Table  I were 
generated.  All  the  plots  are  to  be  found  in  Appendix  C.  While  the  table  is  a 
convenient  presentation  of  the  results  of  testing,  some  caution  is  in  order.  As 
seen  in  the  7.8  to  8.0  GHz  band  of  the  figure,  there  is  a negative  slope.  This 
adversely  affects  the  statistics  for  those  cases  that  exhibit  this  slope,  for  the 
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calculated  standard  deviation  will  be  higher  for  these  cases,  as  will  be  the  peak- 

to-peak  values.  In  effect,  these  represent  the  worst  case  statistics. 

The  best  tuning  configuration  found  utilized  the  two  bent  rectangles,  large  j 

and  small,  together  in  rotation  with  matched  antennas.  In  the  1.0  to  1.2  GHz  ! 

I range,  the  average  loss  is  0.925  dB,  the  standard  deviation  is  0.299  dB  and  the  i 

I 

I peak-to-peak  value  is  1.7  dB;  when  compared  to  the  original  tuner  with  unmatched 

i antennas  (average  loss  = 5.753  dB,  sigma  = 3.388  dB,  p-p  = 16.00  dB),  this  is  a | 

; 1 

tremendous  tuning  enhancement.  The  maximum  transmission  loss  is  1.9  dB,  which,  as  i 

* seen  in  Table  I,  is  less  than  the  average  loss  for  any  other  configuration  in  this 

J 

frequency  range.  This  two-tuner  configuration  was  also  the  best  one  tested  at 
4.0  to  4.2  GHz,  with  an  average  loss  of  3.713  dB,  a standard  deviation  of  .519  dB, 
and  a peak-to-peak  value  of  2.9  dB.  The  maximum  loss  is  5.4  dB,  which  is  almost 
equal  to  the  average  loss  of  the  original  configuration,  5.347  dB.  j 

The  large  bent  rectangle  (best  single  field  tuner  discovered)  in  rotation  plus 
translation  with  matched  antennas  was  the  second  best  configuration  tested.  While  | 

not  too  much  worse  than  the  two-tuner  in  rotation  case  at  4.0  to  4.2  GHz,  where 

i ; 

differences  in  average  loss,  standard  deviation,  and  peak-to-peak  value  are  less 

than  0.3  dB,  it  does  not  tune  as  well  in  the  1.0  to  1.2  GHz  band.  Here,  the  i 

average  loss  is  2.132  dB,  or  1.2  dB  worse  than  for  the  two-tuner  case.  The 

standard  deviation  and  peak-to-psak  value  are  more  than  doubled,  to  0.665  dB  and 

1} 

3.7  dB  respectively.  However,  the  large  bent  rectangle  in  rotation  plus  trans- 
||  lation  does  offer  significant  improvement  over  the  original  tuner  in  rotation  only 

;;  with  unmatched  antennas  discussed  above.  Also,  when  compared  to  entry  4 of  Table  I, 

J 

which  is  the  original  tuner  in  rotation  plus  translation,  the  large  bent  rectangle  ' 

exhibits  better  transmission  loss  statistics,  with  standard  deviations  only  half  as 

large. 

Finally,  both  the  small  and  large  bent  rectangle,  entries  3 and  5 of  Table  I,  ' 

yield  acceptable  results  in  rotation  only  with  matched  antennas  when  compared  to 
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the  original  tuner  in  rotation  only  with  unmatched  antennas,  entry  13.  At  1.0  to 

1.2  GHz,  the  large  bent  rectangle  in  rotation  only  has  an  average  loss  of  2.190  dB, 
and  a standard  deviation  of  0.824  dB,  both  numbers  being  within  0.16  dB  of  those 
for  the  same  tuner  in  rotation  plus  translation;  one  tunes  as  well  as  the  other 
here.  At  4.0  to  4.2  GHz,  there  is  only  0.12  dB  difference  in  the  standard 
deviation,  indicating  that,  again,  losses  in  the  EM  chamber  using  the  large  bent 
rectangle  in  rotation  alone  can  be  predicted  with  the  same  degree  of  confidence 

as  with  rotation  plus  translation,  with  only  an  overall  decrease  in  average  loss 
of  about  2.0  dB  being  the  major  difference  in  the  two  configurations.  The 
comments  on  the  improved  tuning  ability  of  the  two-tuner  scheme  over  the  rotation 
and  translation  of  the  large  bent  rectangle,  stated  in  the  preceeding  paragraph, 
apply  as  well  to  the  rotation  only  case. 

As  noted  in  Table  I,  the  small  bent  rectangle  in  rotation  only  is  clearly 
inferior  to  the  large  bent  rectangle  in  the  two  lower  frequency  bands.  However, 
at  4.0  to  4.2  GHz  and  7.8  to  8.0  GHz,  there  are  virtually  no  differences  in 
performance,  with  average  losses  and  standard  deviations  being  within  0.2  dB 
in  both  cases.  Only  the  peak-to-peak  values  are  very  dissimilar  in  the  7.8  to 
8.0  GHz  band,  being  7.6  dB  for  the  large  bent  rectangle  and  4.7  dB  for  the  small 
bent  rectangle,  a difference  of  2.9  dB,  although  the  standard  deviations,  1.410  dB 
and  1.304  dB  vary  by  only  0.1  dB. 

3.4.2  Effects  of  Equipment  in  Chamber 


While  this  contract  was  primarily  concerned  with  reducing  the,  transmission 
loss  variations  as  a function  of  frequency  through  the  empty  EM  chamber,  there 
will  be  equipment  present  in  the  chamber  during  susceptibility  testing.  Therefore, 
an  unpowered  Boonton  power  meter  [8  1/4"  (20.9  cm)W  x 5 1/8"  (13  cm)H  x H"(27.9  cm)L] 
was  placed  in  the  chamber  to  simulate  an  actual  EM  susceptibility  test  condition. 
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and  a number  of  tests  were  run  to  determine  what  effects,  if  any,  would  be 
produced.  Figure  13  shows  the  meter  in  the  chamber  and  Table  II  sunriarizes  the 
results.  When  compared  to  the  corresponding  configuration  for  an  empty  chamber, 

shown  in  Table  I,  the  addition  of  equipment  tends  to  raise  the  transmission 

losses  through  the  chamber,  with  the  degradation  most  prominent  in  the  1.0  to 
1.2  GHz  and  1.8  to  2.0  GHz  ranges. 

The  two-tuner  configuration  in  rotation  only  was  the  best  tuning  scheme  for 
equipment  in  the  chamber,  as  it  was  for  an  empty  chamber.  It  was  the  best  at 
1.0  to  1.2  GHz,  where  the  average  loss  was  4.308  dB,  the  standard  deviation  is 
0.751  dB,  and  the  peak-to-peak  number  is  4.5  dB.  Compare  this  to  all  the  other 

cases  in  Table  II.  At  4.0  to  4.2  GHz,  the  two-tuner  scheme  is  just  a little  better 

than  the  large  bent  rectangle  in  rotation  with  and  without  longitudinal  translation. 

The  performance  of  the  chamber  with  equipment  before  the  paddlewheel  and 
antenna  improvements  were  made  is  worth  noting  here.  Figure  14  shows  the  measured 
transmission  loss  in  the  two  low  frequency  bands.  An  overriding  component  with  a 
frequency  of  approximately  70  MHz  is  clearly  present.  Since  this  effect  is  removed 
by  the  new  antenna  design,  it  is  apparent  that  poor  design  can  severely  degrade  the 
performance  of  the  chamber. 

3.4.3  Low  Frequency  Limits 

After  the  peak-to-peak  variations  in  transmission  loss  versus  frequency  had 
been  reduced  in  the  1.0  to  10.0  GHz  range  with  tuning  improvements  tested  under 
this  contract,  transmission  losses  for  frequencies  below  1.0  GHz  were  obtained 
using  the  large  bent  rectangle  in  rotation  with  matched  antennas.  It  appears 
that  the  lower  limit  is  about  800  MHz;  everything  below  here  is  as  bad  as  the 
tuning  in  the  chamber  was  at  1.0  - 2.0  GHz  with  the  original  tuner  and  unmatched 
antennas.  From  800  to  1000  MHz,  although  the  peak-to-peak  value  and  the  average 
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FIGURE  13  EM  CHAMBER,  SHOWING  BOONTON  POWER  METER  INSIDE. 
THE  FIELD  TUNER  ON  THE  FAR  END  IS  THE  LARGE  BENT  RECTANGLE 
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MINIMUM  TRANSMISSION  LOSS  - dB 
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are  greater  than  from  1.0  to  1.2  GHz  (See  Figure  15),  the  transmission  loss  is 
fairly  well  behaved  and  the  chamber  could  be  used  at  800  to  1000  MHz  if  needed. 

3.4.4  Test  Times 

While  Tables  I and  II  indicate  the  best  tuning  scheme  is  the  two  tuner 
configuration  (large  and  small  bent  rectangle  in  rotation  only),  followed  by  the 
large  bent  rectangle  in  rotation  plus  translation,  these  two  tuning  methods  have 
certain  disadvantages,  not  only  relative  to  each  other,  but  in  relation  to  other 
cases  listed  in  the  tables. 

The  primary  drawback  to  the  top  two  tuning  schemes  is  test  time.  The  more 
measurements  per  frequency,  the  longer  the  test  time.  Table  III  shows  relative 
test  times  for  a 200  frequency  test.  The  large  bent  rectangle  in  rotation  plus 
translation  test  times  vary  with  frequency;  since  these  times  are  no  better  than 
those  for  the  large  bent  rectangle  plus  small  bent  rectangle  in  rotation  only, 
and  since  the  latter  configuration  is  more  accurate  and  easier  to  implement  (no 
longitudinal  translator  need  be  built)  , the  two  field  tuner  scheme  is  clearly  more 
practical . 

The  large  bent  rectangle  in  rotation  only  offers  a considerable  time  savings 

with  only  a small  amount  of  degradation  in  transmission  loss  when  compared  to  the 

large  bent  rectangle  and  small  bent  rectangle  together.  See  Tables  I and  II.  Only 

at  1.0  GHz  to  1.2  GHz  is  there  much  difference  in  the  statistics,  where,  for  the 

large  bent  rectangle  alone,  standard  deviation  is  almost  3 times  larger  in  the  empty 

chamber  and  1.5  times  larger  with  equipment  present.  In  most  test  situations,  this 

small  sacrifice  in  uncertainty  can  be  tolerated,  since  test  times  for  one  tuner  in 

rotation  alone  are  over  100  times  shorter  than  those  where  two  tuners  are  used 

together  or  translation  is  added  to  rotation.  The  small  bent  rectangle  in  rotation 

only  is  included  in  Table  III,  for  it  can  be  rotated  twice  as  fast  as  the  large 

bent  rectangle,  due  to  its  smaller  size  and  the  accompanying  decreased  torque 
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requirements  on  the  stepping  motor.  The  small  bent  rectangle  could  be  used  in 
some  applications,  particularly  at  higher  frequencies  where  the  large  bent 
rectangle  offers  little  or  no  improvement  in  transmission  loss. 

TABLE  III 

Test  Times  for  200  Frequencies 


CONFIGURATION 

TEST  TIME  1 

Large  Bent  Rectangle/Small  Bent 

~ 

Rectangle  in  Rotation 

40  hours 

Large  Bent  Rectangle,  Rotation  and 
Translation 

i 

35-50  hours  ' 

1 

Large  Bent  Rectangle,  Rotation  only 

40  minutes 

Small  Bent  Rectangle,  Rotation  only 

20  minutes 
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4.  EVALUATION  OF  HALFWAVE  DIPOLE  MODEL 

Electronic  system  EMV  hardness  designs  are  based  upon  an  estimate  of  the 
amount  of  power  which  would  be  picked  up  from  the  electromagnetic  environment 
by  an  unshielded  wire  or  cable.  Previous  work  (Reference  10)  has  indicated 
that  the  peak  pickup  level  can  be  predicted  by  the  effective  aperture  of  a 
matched  halfwave  dipole  antenna 

A„  = . 1 3 A ^ 
e 

This  relationship  obviously  breaks  down  as  the  frequency  approaches  zero  (x  -<■'»), 
so  an  estimate  of  its  lower  frequency  limit  is  needed.  An  experiment  using  two 
lengths  of  twisted  wire  pairs  was  conducted  to  measure  peak  effective  apertures 
at  eight  frequencies  between  100  MHz  and  2 GHz. 

A fiber  optics  system  was  used  to  transmit  measured  values  from  the  test 
sample  to  the  receiving  instrumentation.  Figure  16  shows  the  test  configuration. 
Both  test  samples  (a  two  foot  and  a ten  foot  cable)  were  terminated  on  one  end 
with  50  ohms  and  the  other  end  with  a detector  connected  to  the  fiber  optics  system. 
The  test  samples  were  mounted  on  a wooden  support  and  rotated  in  azimuth  to 
produce  antenna  patterns.  See  Figure  17.  Conical  cuts  were  taken  to  examine  the 
three  dimensional  pattern  more  closely.  The  number  of  cuts  ranged  from  seven  at 
115  MHz  where  the  pattern  lobes  were  broad  to  19  at  2000  MHz  (every  five  degrees  in 
elevation)  where  the  lobe  structure  was  more  pronounced.  See  Figure  18.  A total 
of  213  patterns  were  measured  for  the  two  test  samples  and  eight  test  frequencies. 

The  peak  pickup  levels  are  displayed  in  Table  IV.  For  clarity,  all  values 
have  been  referenced  to  a one  watt  per  square  meter  power  density.  Also  shown  is 
the  calculated  peak  pickup  of  a matched  halfwave  dipole.  A least  squares  regression 
calculation  shows  a dependence  for  the  two  foot  (.61  m)  cable  and  a f 
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FIGURE  16  DIPOLE  MODEL  TEST  SETUP 
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T iP 

10  FOOT  (305  cm)  CABLE 
2 GHz,e  = 50° 


REPORT  MDC  E1637 


31  MARCH  1977 


0.220 

0.300 

0.400 

0.600 

0 .900 

1 .300 


Table  IV 

2 

Peak  Power  Received  Referenced  to  a 1 Watt/m  Field 


Frequencv 


2 foot  (.61  m)  cable  10  foot  (3.05  m)  cable 


\/2  Dipole 


0.115  GHz 


19.5  dBm 


22.3  dBm 


29.5  dBm 
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dependence  for  the  10  foot  (3.05  m)  cable.  By  constraining  the  frequency 

-2 

dependence  to  exactly  f”  for  comparison  to  a halfwave  dipole  the  following  least 
square  equations  result: 

Pp(dBm)  = 6.53  + 10  log  f"^  (2  foot  (.61  m)  cable) 

P|^(dBm)  = 6.64  + 10  log  f"^  (10  foot  (3.05  m)  cable) 

P(^(dBm)  = 10.7  + 10  log  f"^  (x/2  dipole) 

p 

where  a 1 watt/m  field  is  assumed  and  f is  measured  in  GHz.  The  standard  error 
is  given  by  


S.E. 


where  d = difference  between  predicted  value  and  measured  value, 

N = number  of  points. 

For  the  2 foot  (0.61  m)  cable,  S.E.  = 4.2  dB;  for  the  10  foot  (3.05  m)  cable, 

S.E.  = 4.3  dB.  Thus  the  expressions  for  pickup  on  the  two  cables  are  within  a 
fraction  of  a decibel  of  each  other  and  within  one  standard  error  of  the  halfwave 
dipole  expression. 

System  designers  can  use  the  halfwave  dipole  expression  to  estimate  the  pickup 
on  unshielded  wires  and  cables  with  fair  confidence  over  the  frequency  interval 
beginning  at  100  MHz.  When  this  pickup  information  is  combined  with  a knowledge 
of  component  susceptibility,  minimum  shielding  specifications  can  be  derived  which 
will  insure  no  unwanted  EM  responses  will  occur  in  the  system  exposed  to  high  power 
EM  fields. 
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5.  CONCLUSIONS  AND  RECOMMENDATIONS 

The  concept  that  a multi-mode  EM  test  chamber  can  be  designed  and  built  to 
produce  optimum  coupling  from  input  to  output  has  been  amply  demonstrated.  To 
apply  this  test  capability  to  practical  problems  of  determining  shielding  effective- 
ness or  system  vulnerability,  it  is  necessary  to  assume  that  the  optimum  coupling 
will  also  exist  between  the  input  and  the  sample  under  test.  This  assumption 
gains  credence  from  the  thoroughness  of  the  tuning  mechanisms  described  in  this 
report.  It  is  expected  that  others  may  copy  the  tuner  and  antenna  designs  and 
achieve  similar  results.  If  new  designs  are  attempted,  they  may  be  compared  to 
the  results  reported  here  by  using  the  measurement  techniques  developed  here. 

It  is  recommended  that  MIL-STD-1377  (NAVY)  be  revised  to  include  provisions 
for  the  use  of  improved  antenna  designs  and  field  tuners  such  as  those  described 
here.  Likewise,  automated  test  techniques  based  upon  taking  large  data  samples 
should  be  permitted. 

The  use  of  a half-wave  dipole  equation  to  describe  peak  pickup  on  unshielded 
wires  over  the  frequency  range  of  0.1  to  10  GHz  appears  justified  within  reasonable 
engineering  tolerances. 
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Appendix  A 

WHEELER'S  FORMULAE  FOR  MICROSTRIP  CALCULATIONS 

The  germain  equations  from  Wheeler  (Reference  4)  are: 

1 ) For  wide  strips: 

H _ TT  *^0 

=/k  r 

^ = 1 (d,  - 1)  - 1 in  (2  - 1)  * [In  (d,  - 1)  * 0.293  - “fi] 

2)  For  narrow  strips: 

h'  = ha  + ^ ^ 0.120/k) 

^ exp  (li')  - j exp  (-h‘) 

d|^  = g'  = effective  half  width  of  strip,  including  flux  on  both  outer  and  inner 
faces. 

k = dielectric  constant  of  sheet  material  separating  the  pair  of  strips. 

= 377  ohm  = wave  resistance  of  square  area  of  free  space. 

= wave  resistance  of  symmetrical  pair  of  strips  on  dielectric  sheet  k; 
or  of  one  quadrant  of  its  cross  section, 
w = width  of  microstrip  metal. 


R, 


c 

R 


h = height  of  dielectric  between  metal  strips. 

^2 

h'  = ^ = separation  parameter 

h,  = parameter  h'  for  same  R but  all  space  filled  with  average  dielectric  k 

d d 

k + 1 

k^  = ( — 2 — ) ■ average  of  dielectric  constants  of  sheet  and  free  space. 

These  equations  1)  and  2)  are  for  Wheeler's  configuration  shown  in  Figure  A-1. 
For  the  microstrip  configuration,  the  following  changes  are  made  to  the  formulas  to 
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f— 2a-H 

WHEELER’S 
CONFIGURATION 

FIGURE  A-1  COMPARISON  OF  WHEELER’S  CONFIGURATION  AND  THE  MICROSTRIP 
CONFIGURATION  USED  FOR  ANTENNA  IMPEDANCE  MATCHING 
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compensate  for  the  fact  that  the  microstrip  is  only  half  of  Wheeler's  configuration 
with  a ground  plane:  (See  Reference  9) 
h = b 
w = 2a 

Rpi  = 1/2  = line  impedance  of  the  microstrip. 

The  equations  then  become  (See  Reference  6) 


3)  For  wide  strip  approximation  (within  1%  of  Z for  d.  > 2ir,  R^  < — 

K m ^ 


4)  For  narrow  strip  approximation  (.5^  of  R for  W/h  <2,  or  h'  > 1.485) 


h'  = 
w/h  = 


(0.226  + 0.120/k) 


Thickness  compensation  (also  from  Wheeler): 
aW  is  subtracted  from  calculated  w 

If  w/h  < l/(2Tr)and  T < w/2,  then  aw  = T/k7T  (In  + 1) 

If  w/h  > l/(2ir)and  T < h/7r4,  then  aw  = T/k7T  (In  (1^)  + 1 ) 

where 

T = thickness  of  microstrip  metal  (See  Figure  A-1). 

Appendix  B contains  the  computer  program  used  to  calculate  the  microstrip  widths, 
followed  with  the  results. 
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Appendix  B 

Microstrip  Width  Calculations  Computer  Program 


, . r .,V 

26  PRINT  '‘hlCROSTFaP  IMPEDRNCE  7 PHNSFi  MPP  CtiLL  ULHT  MRS  ■' 
3P  PRINT 

43  DISP  ''LNWEP  INPEDRNCE  IS 
50  INPUT  21 

68  mSP  "HIGHER  IMPEDANCE  IS  "! 

T9  INPUT  Z2 

S0  PRINT  "TRANSITION  FROM" ! Z1 ! "TO"  5 ZC j OHM:;." 

90  PRINT 


1 00 

DISP 

DIELECTRIC  CONSTANT  IS  "I 

1 1 0 

IHPU  ' 

E 

! 20 

DI::.P 

HEIGHT  OF  DIELECTRIC  13  "5 

1.  :l:0 

INPtn' 

H 

■ 

i 40 

PR  INI 

E;  rHELcCTRIC  COHSTRNT  MATE 

1 hL  i.lF  HE  I GriT  " ! H 

150 

loO 

PRINT 
IiISP  ' 

LENGTH  CF  C0HD'.ICT0P  IS  "I 

i 40 

iNPIJi 

L. 

1 30 

DISP  ' 

fH, ill' HESS  OF  CONDUCrOR  I ' 

! .. . ;; 

INRUr 

'i 

200 

0FMP' 

' CONDUCTijR" ; l;  "LOHG  ah  1.1"  1 TI 

■ 1 H ! ..  F.  " ' 

210 
.;2  6 

PRINI 
HI  CP 

J-\<  REMErJl  Fur  OUTPIJT  I;.  ; 

i'SR 

I NF'U  r 

I 

I 

240 

21=L^:; 

UR  E 

250 

0RIHT 

"ELECTRICAL  LENGTH  IS";Li 

260 

2?’0 

PRINT 

F=(21t 

5*i  G’  22.'  Z 1 ■'  ."'■•■'L  1 

1 

200 

PRINI 

"Ci.iTOFF  FPEQUENCV  IC  IF"  'Mil 

PRINT 

PRINT 

"LEHGTH'  1 "ELEC  LENGTH" .-  " IMF 

' . "Nj.DrH  "COPR  NIDTH" 

310 

PRINI 

. 

320 

R=LOG' 

Z2  Zl:> 

;??0 

FOR  L3 

=0  TO  i.  STEP  I 

, 

:.-'40  Z=Z1*E6P  ':R^LZ>.'-L;' 

390  L.1=L2+SQR' E) 

■3  6 0 D = ':  P I + P I + 6 6 :•  ■ ' S Q P.  '■  E ) * Z ) 

CZO  W1  = <P~1  ' ■ P]  -LijG(:2*D-1  t ■■pi 

3 r-: 0 N I = W 1 + ' E ■"  1 ■'  * L 1 1 G ' D - 1 ' + ON  9 . 6 1 7 ■ l < . ' Z * F'  I E ' 

•S’Tti  m1=W1  2 

4 00  Hi  = (SOR'I  EH'  :'''60+<  ■:  E--1  '*'■  0 ^ '6+0 . 1 2 E E t- 1 > 

41.0  N2=8''  (EKP'.  HI  ' -2*EKP(”H1  > •' 

420  IF  W2<2  THEN  428 
430  IF  W1)4  THEN  490 
440  P^'  l'EF~2)  2 
450  N=W1-P+W2*''  1-P  :■ 

460  GOTO  500 
470  U=W2 
480  GOTO  500 

50 

/MCOoMA/EC-f.  oouGLAS  »srf»oM/tt>rtcs  con^r*A>yv  - east 


u 


REPORT  MDC  E1637 


31  MARCH  1977 


4 00 

W = W1 

500 

IF  W::  l/(:2*PI ) 

THEN  570 

510 

N=N*H 

520 

IF  T-;;0.'2  THEN 

550 

530 

Fj  3 = 9 9 '-1 9 

540 

GOTO  620 

550 

W3  = W-':  T*'..L0G'  ■: 

4*PI*N  ' "TT  + l ) >/fE*PI 

560 

GOTO  620 

570 

530 

IF  T>H/'<:4-^Pr:' 

THEN  610 

5'^G 

0-3=9999 

600 

GOTO  620 

6 1 0 

U3=W-(Ti^'::L0G<  C 

2*H)/T>-f  1 ) '.:e-^p I 

6 2 0 

PRINT  L2^L1.Zj 

W-  W3 

630 

HEKT  12 

640 

PRINT 

650 

PRIN  r 

660 

F'R  I N T 

670 

PRINT 

680 

END 

I 
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Appendix  C 

MINIMUM  TRANSMISSION  LOSS  PLOTS 

CONFIGURATION  FIGURE  NUMBER 

Configurations  Tested  in  Empty  EM  Chamber 


LBR  + SBR,  Rotation,  Matched 

C-1 

LBR,  Rotation  + Translation,  Matched 

C-2 

LBR,  Rotation,  Matched 

C-3 

Original,  Rotation  + Translation,  Unmatched 

C-4 

SBR,  Rotation,  Matched 

C-5 

LBR,  Rotation,  Unmatched 

C-6 

Large  Multi-Surfaced,  Rotation,  Unmatched 

C-7 

SBR,  Rotation,  Unmatched 

C-8, 

C-9 

Large  Circular,  Translation,  Unmatched 

C-10 

Curved  "S",  Rotation,  Unmatched 

C-11  , 

C-1  2 

Slanted  Rectangle,  Rotation,  Unmatched 

C-13, 

C-14 

Single-Bladed  Fan,  Rotation,  Unmatched 

C-15, 

C-16 

Original,  Rotation,  Unmatched 

C-17, 

C-18 

Original,  Translation,  Unmatched 

C-19, 

C-20 

Configurations  Tested  with  Equipment 

in  EM  Clamber 

LBR  + SBR,  Matched 

C-21 

LBR,  Rotation  + Translation,  Matched 

C-22 

LBR,  Rotation,  Matched 

C-23, 

C-24 

SBR,  Rotation,  Matched 

C-25, 

C-26 

LRB,  Rotation,  Unmatched 

C-27, 

C-28 

LBR  - LARGE  BENT  RECTANGLE 
SBR  - SMALL  BENT  RECTANGLE 
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AVERAGE  LOSS 
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FIGURE  C-1  MINIMUM  TRANSMISSION  LOSS,  LARGE  BENT  RECTANGLE  AND  SMALL  BENT 
RECTANGLE,  ROTATION  ONLY,  MATCHED  ANTENNAS,  EMPTY  CHAMBER 
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FIGURE  C-3  TRANSMISSION  LOSS,  LARGE  BENT  RECTANGLE,  ROTATION 
ONLY,  MATCHED  ANTENNAS,  EMPTY  CHAMBER 
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FIGURE  C-5  TRANSMISSION  LOSS,  SMALL  BENT  RECTANGLE, 

ROTATION  ONLY,  MATCHED  ANTENNAS,  EMPTY  CHAMBER 
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FIGURE  C-6  MINIMUM  TRANSMISSION  LOSS,  LARGE  BENT  RECTANGLE, 

ROTATION  ONLY,  UNMATCHED  ANTENNAS,  EMPTY  CHAMBER 
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FIGURE  C-7  MINIMUM  TRANSMISSION  LOSS,  LARGE  MULTI-SURFACED  TUNER, 
ROTATION  ONLY,  UNMATCHED  ANTENNAS,  EMPTY  CHAMBER 
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FIGURE  C-8  MINIMUM  TRANSMISSION  LOSS,  SMALL  BENT  RECTANGLE, 

ROTATION  ONLY,  UNMATCHED  ANTENNAS,  EMPTY  CHAMBER 
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FIGURE  C-9  MINIMUM  TRANSMISSION  LOSS,  SMALL  BEAT  RECTANGLE, 

ROTATION  ONLY  UNMATCHED  ANTENNAS,  EMPTY  CHAMBER 
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FIGURE  C-10  MINIMUM  TRANSMISSION  LOSS,  30  INCH  DIAMETER  DISC,  LONGITUDINAL 
TRANSLATION  ONLY,  UNMATCHED  ANTENNAS,  EMPTY  CHAMBER 
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MINIMUM  TRANSMISSION  LOSS  - dB 
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FIGURE  C-17  MINIMUM  TRANSMISSION  LOSS,  ORIGINAL  FIELD  TUNER, 

ROTATION  ONLY,  UNMATCHED  ANTENNAS,  EMPTY  CHAMBER 
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FIGURE  C-22  MINIMUM  TRANSMISSION  LOSS,  LARGE  BENT  RECTANGLE, 
ROTATION  AND  TRANSLATION,  MATCHED  ANTENNAS,  EQUIPMENT  IN  CHAMBER 
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FIGURE  C-23  TRANSMISSION  LOSS,  LARGE  BENT  RECTANGLE, 
ROTATION  ONLY,  MATCHED  ANTENNAS,  EQUIPMENT  IN  CHAMBER 
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FIGURE  C-27  MINIMUM  TRANSMISSION  LOSS,  LARGE  BENT  RECTANGLE,  ROTATION 
ONLY,  UNMATCHED  ANTENNA,  EQUIPMENT  IN  CHAMBER 
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FIGURE  C-28  MINIMUM  TRANSMISSION  LOSS,  LARGE  BENT  RECTANGLE,  ROTATION 
ONLY,  UNMATCHED  ANTENNA,  EQUIPMENT  IN  CHAMBER 
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Appendix  D 


Data  Gathering  Programs 

83 
92 

105 
108 


Rotation  Only 

Page 

Longitudinal  Translation 

Page 

(with  and  without  rotation) 

Reading  Programs 

TPLOT  - Transmission  Loss  Plots 

Page 

RPLOT  - Reflection  Coefficient  Plots 
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Computer  program  TEMEC  provides  the  capability  to  automate  EM  chamber 
measurements  when  large  amounts  of  data  need  to  be  gathered  and  analyzed  in 
evaluating  tuning  improvements.  The  program  is  written  in  the  Extended  Fortran 
IV  package  provided  for  the  Interdata  Model  7/16  Mini -computer.  A diagram  of 
the  test  system  is  shown  in  Figure  3 of  this  report. 

Figure  D-1  is  a flow  chart  of  TEMEC  2 for  one  fan.  The  input  data  variables 

allow  the  program  to  be  used  at  any  frequency  range,  with  various  frequency 
increments  and  tolerances;  program  and  testing  control  is  also  specified  here.  A 
printout  of  the  program  follows  the  flow  chart. 

Figure  D-2  contains  a flow  chart  of  the  two-tuner  version  of  this  program,  and 

it  is  followed  by  a printout. 
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FIGURE  D-1  FLOW  CHART  OF  EM  CHAMBER  DATA-GATHERING  COMPUTER  PROGRAM 
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rLftB=  TEnEC2 
tDBUG 

$T1TL  +++++  TEMECS  +++++  SEPT  8.1975  SLOW  SINGLE  FAN  VERSION 
REAL  KURT,  KIJRTl,  METERF,  METERP,  LOUF,  LFL 
INTEGER *2  SYH 

II I HENS  I ON  2INHOP(2CiO>,  ZINVEPCEOO),  POUTEN  < 200 , AK-n, 

IJl  (-TY,  HI  <614>  . DSC  14) 

EOUI  VALENCE  i.' H 1 c 1 , 2INH0P(  1 ) ).■  <111  '"201  ),  ZINVEF  < 1 > ?, 

1 1.II1  ■ 401  >,  POUTEfK  1 > >,  <Iil<C01  >,  METERF  <Ii  1 <'-:02  ■ ■ riETERP), 
2(DUeOS>,  NF'hSS'i,  '.pi  <004  SUMl  < P 1 (fc-OS),  SUM2.''  • 'PI  ''OO,  SUHS>, 
3 < P 1 < 5 0 r > , S U M 4 .n , p 1 ' 6 0 0 ) . H V E > • < P 1 < C 0 9 ) . S 1 G HA)  .•  < P 1 C 10',  S I ■ F'  l.l  > , 
4<lil  12,'  • FLARGE>  • '.PI  (.61  1 ),  KURT>  • ':P3<  1 ) , P 1 <60  1 ) ) 

EOUIVAI.FNCE  <Pli:613>.  NThPE),  <P1  (:614>,  HFILE:' 

PhTA  cl-'"'*'.!?'-',  CT.'-'?'<E 
Mr-'ITE<  1,  12S> 

REAP(  1 . 12'j''  NT  FILE 
CALL  FRF'HCS,  NTFILE> 

I.IR1TE<  1 . .36) 

REAP'.;  1,33)  SThPTF 
WR1TE<  1 . 76) 

REAIKI  33)  STOPK 
MRU  E<  1,  77  ) 

REAP<1,31>  FINCRE 
WR1TE< I , 78) 

REAIK  1,  31  )FTOL 
l..lF-;nE<  1 ■ 79) 

REAP <1.31)  RANGER 
UIRI  FE<  ! .■  121  > 

REhP<1,31)  PBREF 
i'lRITE'".  1 .•  123) 

RE:aP<1.  120)  NThPE 
IJR1TE<  1 iza;! 

REAIKI. 120)  MFILF 
MR  n E ■ 1 .•  60  .■ 

REAIKI,  123)  IMAIT 
URITE'M-,  63) 

NR  I TE  64  ' N fare,  NFTLE 
IF  (Fine  RE  EO.O  ) FIMCFE^^l.O 
J1  < 1 
J1  <2)  = t. 

.1  < < 3 ) - 7 
J 1 < 4 ) - 4 
FVOLT-0  0 
117-0 

iNPi::;==  i + <sTor'F-sTnrTF  > - FINCRE 
pij  9 1--1  nine;; 

METERP-O 

sun  1 = 0 

SUM2=0 
SUH3=0 
SUH-t^O. 

F I URGE  - -101 . 0 
lAA  NFL=-';  I hRTF  + FTOL 
I.F  L-SThRTF-FTOL 
NRITE'S)  CL 

Nr-.ITC<3,  101.  ERF  = 10:?.  EHD=103) 

NF  IFE'.  3)  CT 

RFmfks. 102, err^iaa, enp=ios)  svm, value 

N L T E R F = V A L LI  E ■ 1 iJ  0 0 0 0 0 . 

IF'IIETEFT  GT  HFL.'  go  to  103 
IF<MLTERF.LT  LFL)  GO  TO  104 
>,A  TO  lOS 

'F'’  ' on  =rvoi.T-  004 
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C 


GO  TO  lOp 

104  rVOLT=FVOLT+  004 
GO  TO  IttD 

106  OVOLT=FVOLT 

CALL  AOUT< 1, 1 1, OVOLT, K) 

IF<K.  HE.  1 ) PAUSE  1 1 
CALL  WAIT (50, 1, M> 

IF(M. ME.  n Pause  1 1 1 1 
GO  TO  lOS 

105  DO  0 J=1,,';00 
CALL  HAIT(2.C.M> 

IF(M  HE.1>  PAUSE  nil 

22  (ALL  AIMHLCT. Jl, Al, K> 

IFvi:  ME  1>  PAUSE  5674 
2 1 MMOR  ( ..I H 1 ( n + 02 ) .^2 . 055 
2 1 MVER  < J:)  ^ < A 1 ( 2 > + . OS  > 2 . 060 
POUTEM  ( J :>  ^ ( ( il  1 ( 3 > - 1 . 5 > . 05  > + DBREF 
IFCAK-n.GT  0.S2.''  GO  TO  200 
IF<A1  (4:' . LT.  0 SbS.'  GO  TO  200 
PAUSE  S 
GO  TO  22 

200  IF(POUTlM(  J>  LE.-lOO  0>  ROUTE M ■' J ) =-99 . 5 
PHO  = SOPT  ( < 2 1 HHOP 1,  J ) * t 2 > + ( 2 1 M'-'ER  ( J ) +■1  2 T ) 
IFCRMO  CT  1.)  PhLISF  1 
IF  (RHO-l.GT  26, 26, 2? 

26  IF  (POLnEM(.J> . LE  PLAF:CE>  CO  TO  16 
PLARGF^POU  r[:M(  J> 

RMOLAR=RHO 

1 6 SUM  1 =.S!.IM  1 +POUT  EM  ( J :■ 

SUil2^SUM2  KPOUTEIK  J>  >*  2 > 

SUM3=SUM3  + (P0'.ITEM'  J>  : >3> 

SUiT4  = SUMA  + ( POUTEM t ' 4> 

TEM=10. 

CALI  AOUT(  ; . 10.  TEM,  i:> 
iP(v.nE.n  PAUsi-  JO 
CALL  MAIT'  IMiTIT.  1.  [!:■ 

1F<U  ME.  n PAUSE  1111 
2ER0-0 

CALL  AOUT'-  1,  10,  2r.R0,  i;> 

IFd'.ME.l’  PAM  10 
CALL  MAlT'  I '■11^17.  1,  M • 

IF(M  t.E  1 :■  R,.J5l:  1111 
e COMTIMUE 

SUM5=SUn  1 --'200 
SUM6=S:jll2  200 
SUM 7 ---SUM 3 '200 
SUMS -SUM  4 ..'00 
AvE=-::.UH5 

SICnA-C07T''SI.;M6-S6M5<  ‘2.  > 

&KEM-(SUH7-'.3  • SUM5  ' CUhe  ' 2 . 4 'SUMS!  >f3 . >>  ■? 

KUF:T=('5UMS-  4 iSUM7PSUn';T  + ' 6.  t'SUHOtSUM'.A  *2 
ISIGMh*  *4 
MPhSS-I 

HETrr'.E=METErT+.  5 
MI■IETL^;=IMT  METErr  ■ 

MRIT(;<2,  'SOT  MMETER.  MFTEPP,  MPaSS 
lJPITEf2.  61  > sum,  SUMS,  SUH7,  SUM4 
UIPITE';2,  120  ' PLorGE,  PHOLAP 
IJPITE'  2,  62)  hVE,  SIOHiO  si  EW,  FUPT 
MPITE<5>  Dl 

rVOLT  = FVOLT  + <F  IMCFF.  n 7 5 ) ,' < P AMGEF  ♦ 1 OOO . ) 
STAFTF  = STAPTr  + riMi'PE 
M2=M2+ 1 


IGM.A<  7 
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IF<MZ. LT  S)  CO  TO  ? 

IJRITE(2.  67) 

URITE<2, 122) 

WRITE-:;-:,  64)  HTtnRE,  HFILE  . • 

t12=MZ-S 
9 COriTIHlJE 
31  rORtlHT<F7.  3) 

33  FORnHT«;r6  0) 

36  fOP,-i:TT<l,;,  'ENTER  STOPT  FREPUENCY,  IN  MHZ,  IN  THE  FORM 
60  FORMiVKi::,  ■FPEOUEHCY^',  16,  ' MHZ ' , 5X,  ' POMER  IH=',F7  3, 
15N,  'PASS  NIJMOGP  ',  13) 

6 1 FORMAT  C 1 N,  ' CUM  1 ^ , E 1 3 . 6,  ' np ' , 5-;,:,  ' SUM,2=  ' , E I 3 . 6,  ' HE  6 
nX,  .-'IX.  •SUH3--',  E13.  6,  ' I-P  uUPfD',  3X,  ■SUM  t = ' . E13  6, 

2'  HF.;  TO  THE  FOURTH') 

62  FORHAT< IX,  ' AVE  = ' . F3.  3,  ' DP ' , 5X,  ' 5 1 GMA" ' , FS . 3,  ' DB',3X 
IFP. 3, 5X, 'KUkT=' , FS  3^ ) 

63  FORMAT-:  1 HI  ' 

64  F CIRMAT<23X,  ' TCMEC  TEST ',  5X,  ' TAPE  MO.  ' , I 4 . 5X,  ' F I LE  MO 
60  FORMAT-: ' IMRUT  MCEC  WhIT') 


XXXXX. 
MW' , 


OI.IAPED', 


'Sf:fw^-', 


76  FORMAT  Ci::,  ' ENTER 


FREO. IN  MHZ.  IN  THE  FORM  XXXXX 


F OPMAT< IX,  'ENTER  FREO  INCREMENF, 


IN  THE  FORM 


78  FORMAT-:  IX.  'ENTER  FREO  TOLERANEE,  IN  KHZ.  IN  TKE  FORM  'XX. 


XXX. XXX' 
XXX' ) 


FOPMhT<lX,  'ENTER 
: UR  HAT-;  ■ OTOTMOH'  ) 
FfiRNHT-:A2.  IX.  E 1 I . 


HPCeoO  FREO  RANGE.  IN  GHZ.  IN  THE  FORM 


120  rORMuT-:  1 X,  ’ L hRGEST  FOWEP 


)-' , F7.  S'- 


121  format-;  IX,  ' EUTE  •;  F- 

122  FORMAT  ax,/) 

123  FARMAT<1X. 'FMirp  ^ 

124  FORMAT (1 X, ' ENTER  F 

125  F0PMhT<I4- 
12.8  FORIEiT  ..  i::,  'ENTER  NO. 

11  ENDFU.F  5 

12  crop 

END 

ESTA  TEHEC2 
PR  10  9 

OPTI  0010  1001  1001  00-30 
ASS  I 1,  10,  2,  0,  3,  zr,  5,  85. 
GET  200 
LOAD 

EDIT  5':6 
MhP  -FI; 

TASK  rC:6 
END 


F-OHEE-  IN  OFFSET,  IN  DO,  IN  T'rlR:  FORM  XXI 


'FNIFP  TAPE  NUME'EP. 
'ENTER  file  NUNGER, 


IN  THE  rOPM 
IN  Tin:  FORM. 


FILES  TO  CHIP,  IN  THE  POPM  XX: 


BtSI  AVA'i! 


lU  f.P.'  P 


F 
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j FIGURE  D-2  FLOW  CHART  OF  COMPUTER  PROGRAM 

i TEMEC  2 - TWO  TUNERS  IN  ROTATION  VERSION 
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tLnB=  TD:riEC3 
IDBUG 

*1ITL=  +++++  TEMECS  +++++  TWO  TAN  VERSION.  DECEMBER  3,1976 
REAL  KURT,  KURT  I,  HETERE,  METEPP.  LOMF,  LPL,  METERT 
INTEGER* 3 SYM 

DIMENSION  7INH0R^G00V.  3 1 NVER  < 200  ) , POUTEN  ( 200 , A1  (4), 

1 J 1 < 4 > , D I < 6 1 -n , Ii2  ■:  1 i > , D3  C 1 4 .I 

rotii  valence  <.di  ■■  1 ',  zihhor<  i > >,  <di  <201  >,  2iNVcr!<  1 > >, 

1 <Dl  <401  ),  POUTEN',  1 > >,  <D1  '-.60  0,  METEPFO  '^Dl  'NIO?  ■ • METEPP  i, 
2(ri(603>.  rlPASS.:',  ■CDKCCH.'-',  SUMO,  (DOGOS^,  SUM2',  <1U<:606>.  SUMS'', 
3<D1  <607.'',  SUM4  <ril  <SOS,V.  rtVE),  <D1  <609>  . SIGMA),  < D 1 ■ 610.',  S'  EM'  • 
4<ril  <61  O,  KUPT)  . <D2':  O,  SUN9;,  < D2<2),  SUM  10''  ■ 

5 < D2  < 3 ) , SUM  1 O , < DC  < 4 > , SUM  12),  < D2  < 5 > , AVE  1 ■ , i;  I'2  ' 'S :' , S I C-MA  1 ' • 
6<li2''7>,  SKEUl  >,  <Ti2':SO,  INJI  TO,  <D2':9>,  NPASS  I ' . ';D2'.  10..'  • METEPT' 

7,  < D 1 < 6 1 2 ) , PL ARCE ) , < D2  < 1 O , TPL ARG  > , < D3  < 1 ' , P J < 60 1 .O 
EOUIVALENCE  <D1<613).  NTAPE),  <ril<614),  NFILE.' 

DATA  CL'  ■'  ? *<  A ' / , C T O E ' ■ ' 

URlTt;<  1 . 12P.  ' 

READ<1,12S)  MTFILT 
CALL  FRFM'-S.  NTFILE) 

WRITE< 1 • 3G> 

REaD<1-33.)  STaPTF 
UIRITE<  1,  76.) 

RE AD <1,. S3)  STOTT 
WRITE';  1,  77) 

REa1":1,  SO  FINCRE 
WRITE<  1,  7.5) 

READ< 1 , SI  'FTOL 
WRITE< 1, 79) 

RF.AD<1,31'  PANGEF 
MPIIE'.;!  170 
Rt:AD<l'SO  DTTEf 
WR1TE< 1 , 123) 

REaD<  1,125)  NTi'TT 
WRITE'.  1 ■ 174) 

REaIKI, 120)  NFILL 
I F < F I NC  RE  FT;  0 . ) Ft  NC.F:E=  1 . 0 
J1  '.  1 '='0 
J1  <2)-'S 
Ji  <3:'  = 7 
J 1 < 4 ) = •! 

FVOL  7=0.  0 

INDr:'=i  ►'.  STOFT-OTAPTF  ) FItICP.F 
1 H7=t:. 

I'l/ 10  (Nt-'i.  impe:'. 

TPt.ARn  = -irji  0 

SUM  1 0=0.  0 
SUMIOA  0 
SUMl.'-'  C'  0 
DO  9 1=1,200 
METERF=0 
SUM  1 --  0 . 

SUH?.  = 0 
SUMS=0 
SI  104  = 0 

PLhPGF=“101  0 
100  UFL  = S7  iiRTf +FT0L 
LFL=S7h; TF'FTOL 
WRIT  ECO  TL 
WRITE '3,  lOO 
MF1TF<3,'  CT 
FTAP<3,  102)  S't'H,  VALUE 


BtSTAViS 


ilk>» 
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nETERr  = VALUE^  lOOOCiOO. 

IF<HETEPF. GT  HFL>  GO  TO  107 
IF<ttETEFF.  LT  LFL>  GO  TO  104 
GO  TO  105 
FVOLT=FVOLT-. 004 
GO  TO  lOG 
FVOLT=FyOLT+  004 . 

GO  TO  lOG 
OVOLT^'FVOLT 

ChLL  OOLITC  1 .11.  OVOLT.  K'j 
IFCK.NE.r'  Pi4U£E  11 
CALL  MAI  T (.50>  1>  H) 

IFCM.HE.l)  FrtMS.C  1111 
GO  TO  IOC 
I'O  8 J-l.GOO 
C ALL  MAIT<2. E,  M) 
irCM.ME  n PAUGF  1111 
call  AIHHLCA,  ..11,  Hi  , I') 

IFCK. HE  1 > PAUSE  5674 

FOUTEII'  J>=  C <A1<3>-1  5>.'  OOl  + DBPEF 

IFfPOUTEIK..!  ' , LE.  -1  00.  0'.'  POUTEIK  =-?5 . 5 

IF  <POUTEH<J>. LE  PLhPGO  GO  TO  IG 

FLARGE^POUTEIKJ.'' 

SUH1=SUM  1 +POU  I ElU' J> 

S U M 2 = S U !•:  S + ■:  I'  0 U T E I i < J > .f  •<’  2 :■ 

S LI  M 3 = S LI  t n.  + < P 0 U 1 E 1 1 L J ) 1 3 ) 

S i-l  M 4 = S l.l  11  • p 0 LI  T E N C J ) I 4 > 

TEU=10 

CALL  AOUTi:  1 . 10,  TFH. 

IFCK.ME  1.-)  PhUSE  10 
CALL  MAIT<1,1,H' 

iFci'i.u::  1'  pause  iiii  \ 

ZEF'0=0  O ' 

CALL  hO'U  1 >.11 0 . ZERO  - VO  X >. 

I Fa  . ME  I PAUSE  10  V 

CAl.L  MA  I T <■  I . 1 . r 1' 

IFai  ME  1>  PAUSE  nil 

COMTIMUE  V 

IF  CPLaPGE  LE  TPLhPG',  GO  TO  3 

TPLARG^PLaPGE 

METERT- METLPF 

coin  ItIL'E 

SUMS'- SUMS  I SUI'll 

siinii:i^suni';'+;.iiM2 

sum  i-SLTii ' + :.uii3 

s5m2=S'.Mni':u!i4 

s.ij:i5=gi.imi  s.ia 

SIJr-|i;  = SUM2^  LAO 
oijii.'-siiiis-  ,;i:io 
SUMS -SUM 4 '200 
aVF  = SUIi5 

SIGMA  = Si;'RT''SUMi;-SUM5  I i2  > 

SI'Fl.l-CSU-17-'  3.  ‘SUM','SUMG..  + <2.  -tSUH'.Vv.iS.  > 'S  I GHA-'  i3 


KURT-CSUMS-'  4 . SAMP  * 
ISIGMAt  *4 
UPmSS^I 

METEPF=nPTFPP+  5 
MHETCF:=IMT  JIETEF  E) 
MRITE<5>  in 
• TEM=10 

Call  hOUT'  I,  0,  TEM.  I > 
IF<K.  HE  1 • PAUSE  :» 
CALL  MAlTCl,  1,  tl> 


tSUM5)+<C  ♦SUMG*SUM5t ' 2. 


'SUMS' 
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IF<M.  HC.  o p^use:  1 1 1 1 
ZERO=0. 

ChLL  huU  i < 1, 9,  zero,  K) 
ir<K. ME. 1 ) PMUSE  9 
CftLL  MAIKl,  1,  !t> 

I r<n  ME.  1 > PMUSE  1 1 1 1 
COMTIMLIE 

SUni.7  = 9UM9.'-l  00  Dm 
SUM  1-1  = SUM  10  ■■‘10000. 

SUM  15- SUM  1 1 ‘lO'iOO. 

SUM10  = SUM12  ■•■tOODO. 

AVFI^SUMIS 

■S I G M A 1 = S 0 R T C S U M 1 •■',  - S U M 1 3 '♦  'f  9 , ) 

SKEI..Il  = <SUM15-<7.  <‘'SUM13»SUM14>-mZ.  t GUM  1 3'*‘’*  7 . > > ^S I GMA 1 G . 


K U R r 1 - ( S IJ  M 1 S - < ‘i  ■«■  G LI  M 1 3 
1 ) .''Sir,Mrtl  > A . 

HRASS1='Z02 

l)RrrE(5>  li? 

EMIiriLP  5 

STHRTF-STMRTF+riMCRE 
; F 0 L T - r V 0 L I < r I M C R E * 1 7 
FMIiFILE  5 
FDF'MHTCrT.  7> 


«■  G LI  M 1 3 + G U M i 5 !>  + < e . t S U M 1 ‘I  ■*'  S LI  M 1 3 < : 


■»SUH13*^*4. 


5).''<RAMGErrI000.  ) 


33  CORM-AKfV.  O ' 

3S  F ORMhI' L 1:G  ' CMTEP 

76  FORMAK  IK,  'EMTFF 

77  FOr-MOTUX.  EMFER 
7G  FOl'MAT  ( i::,  ’ KMT  r.F 
79  I opmhT'.  I •fmti-p 

101  FORMAT' • GTOt MOH' 

102  formhT'  1 .3.  r;,  FI  1 
121  FORtiiiT' ! ' FMirr 


START  FREOUl.MCY,  IN  MHZ,  IN  THE  FORM  XXXXX. 
STOP  FRfO,  IN  MH?,  IN  THE  F OPM  ; IK: R R ! . ' ) 

FF:EO  IliCREMLNT,  IN  MHZ,  IN  THZ  FORM  K 
FREO  TOLERFiMCE,  IN  MH2..  IN  THc  FROM  Z 
Hr-';?iS':'ij  FRl.O  RANGE,  IN  C41Z.,  TM  THE  FOF’ 


rOHER-IM  OFFSET, IM  m. IM  THE  FORM 


123  ! OPMOT  ,.  1'.;.  ' rllTER  1 mPE  MUMLiER- 

124  FOPMAT<;  IK,  ' CNTFr:  f lLE  NUMOER, 

125  FuRI.hI  •' 14  .'' 

120  FORM'-.I  . IK.  TMTER  no  OF  FILES  TO 

12  STOP 
EIIB 

ESTA  TEHEC2 
PR  10  9 

OPT  I 00 1 A 1001  1001  0000 


IM  THE  FORM  KKK.K-’ 
IN  THE  FORM  XKKK'' 


THE  FORM 


OPT  I 00 1 A 1001  1001 
ASS  I 1,  10,  2,  0,  3,  3F,  ; 
GET  200 
LCiAP 

Flin  5C>, 

HAP  62 
ThGK  07 
END 


0 0 0 0 

I,  G5,  A,  G3 


BESI  AVAIWSIE  COPY 
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Two  computer  programs  for  testing  the  EM  chamber  with  longitudinal  translation 
of  a paddlewheel  have  been  written.  A flow  chart  and  printout  of  the  first  program, 
LONGIT,  start  with  Figure  D-3.  This  program  positions  the  carrier  output 
translator,  and  hence  the  field  tuner,  every  tenth  of  a wavelength  of  each  test 
frequency,  and,  as  the  tuner  is  rotated  at  these  positions,  it  checks  for  the 
lowest  transmission  loss  at  each  of  these  positions.  After  running  the  full 
length  of  the  translator  (about  6 inches  or  15  centimeters),  the  carrier  is 
returned  to  the  position  with  the  lowest  transmission  loss  of  all  the  positions. 

It  is  then  assumed  that  the  carrier  (and  tuner)  is  in  the  vicinity  of  a trans- 
mission loss  minimum.  Therefore,  the  program  looks  at  6 other  carrier  locations, 

3 on  either  side  of  its  current  position,  for  a total  of  7 positions.  These 
locations  are  1 thread  (18  threads/inch)  apart,  and  at  each  location,  the  tuner  is 
rotated  and  a minimum  transmission  loss  is  obtained.  The  carrier  returns  to  the 
best  of  these  7 positions,  and  the  tuner  rotated  to  its  lowest  transmission  loss 
point;  this  value  is  then  recorded. 

The  second  computer  program,  LONGON,  looks  for  a minimum  transmission  loss 
along  the  entire  length  of  the  translator,  without  rotating  the  tuner,  at  a 
frequency  of  3600  longitudinal  positions  per  inch.  This  program  investigates  the 
effects  of  longitudinal  translation  alone  to  look  at  transmission  loss  as  a 
function  of  longitudinal  position,  and  to  determine  if  rotation  of  the  field  tuners 
does  give  a smaller  transmission  loss  when  compared  to  longitudinal  translation 
only.  Figure  D-4  is  a flow  chart  of  LOilGOfl,  and  is  followed  by  a printout  of  the 
program. 
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FIGURE  D-3  FLOW  CHART  OF  LONGITUDINAL  TRANSLATION 

PLUS  ROTATION  COMPUTER  PROGRAM  'lONGIT' 
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*LAB=  LONG IT 
«DBUG 

$TITL»  +♦+++  LONGIT  +++♦+  OCTOBER  1976>  1976 

S--HP  SG90  FM  INPUT 
A/D  9— ROTATE  FAN  CIO 
A/D  I0--ROTATE  FAN  CCld 
A/D  n--FORIJARD  MOTION  <C10> 
A/D  12--RE VERSE  MOTION  <CCU) 
JIN<l>--STOP  REVERSE  MOTION 
JIN<2> — STOP  FORDAPD  HOTIOII 
ASSIGNMENTS--!.  10/2. 2/3, SF/ 
4. SS/S. SS/6. 62/ 


7. 0/A. 83/ 

REAL  LFL 

DIMENSION  D<220).  D1':20D>..JIN<:2?,  AIH<2) 

IHTEGER*2  SVM 

EOU I VALENCE  (DO  >.  NTAPE),  <’ D<2  >,  NF  ILE>.  <D<3>.  FMETEP). 
1<IK4>.  JllUin.  <Ii<;5>.  K>,  (IKS),  >!),  (D<7>.  !?P> 

2,  (D<8>.  I BACK),  <P<9).  STEPl  ).  <D(  10).  LSTEP)  ■ <Di:  1 1 ).  STARTF). 
SCDC  1 2),  HPOS),  <DM3),  IHDEX),  <D(  14).  NPOSl  ).  (IK  15).  NSTEP), 

4 < li  < 1 6 ^ . X 1 ) , CD  U 1 ) , D < 2 1 ) ) 

DATA  CL/' /.  CT/' ?v  E ' / 

DATA  <D< I >. i=17. 20)/4«O, 0/ 

JUKI  )=5 
JIN<2>=6 
CM--3600.  /2.  54 
F1NCRE=2. 0 
FTOL=0. 2 
RANGEF-2. 0 
NMaVE=10 

C UIRnE<1.66) 

C READ<1,67)  NCHANG 

lORI  rE<  1, 80) 

REArKl,79)  NSKIP 
CALL  FRFM<5. NSKIP) 
lORITEd.  77) 

REAIK1,79)  NThPE 
URITE< 1. 78) 

REA1K1,79)  NFILE 
l.'RITE<  1, 68'- 
REaD<1,51)  STAPTI 
URnE<  1.  C9  . 

PFAIuI.SI)  STORK 
C ircHCHANG  HE. 1 ) GO  TO  39 

UR  I TEC  1, 70) 

RE0DC1,52)  FIlir.PE 
UR  I TE  < 1 . 7 1 ) 

RI-a1K1,52)  FTOL 
UR  I TEC  1.  72) 

READC1.52)  RMlli..rF 
MRITEC 1, 53) 

REhDC1,54)  HUi'i'vT 
39  irCFlNCi^E  EO,  0 0)  FIHCPE-l.A 
IHD4C)=1  + CST0PF-STARTF>/FINCRE 
FV0LT=--0.  0 

URnEC4.  81)  IITAPE,  NFILE.  STAPTF 
DO  40  I INIi=l,  IND40 
K = 0 

I PACK =0 
NROS-0 
XP=-10OO. 

JSTEP«=1 
JNiJM  = 0 


L 

I 

I 

1. 

I 

L 

I 

I 
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r 


I 


Li 

L 

L 

L 

L 

L 

L 

[ 

I 

1 


c 

c 

c 

c 

c 


2 


1 


35 

34 


C 

10f 


3 


103 

104 

C 

C 

C 

105 


43 

36 

4 


NFR=0 

X1=0 

IHDEX-0 

HP0S1=0 

NSTriP=0 

STEP1  = 3O000.  ^STARTF 
LSTEP=<CMh^STEF1  VHWAVE 
WRITE<7,  75.> 

IJRITE<6.  73)  STARTF.  STFPl 
WRITE<6,  56)  L3TEP 

INITIATE  LONGITUDINAL 
POSITION 

1=0 

J=0 

CALL  A I NHL (2,  JIN,  AIN, KERR) 

IF<KF.RR.  HE.  1)  PAUSE  506 
1 = 1 + 1 

IF< I . LT  10)  GO  TO  1 
CALL  STEPO,  1,0) 

1=0 

IF<J. GT, 205)  GO  TO  35 
J=J+1 

IF(J.LT.200)  GO  TO  34 
I F < A 1 N ( 2 ) . f.T  .1.0)  PAUSE  1 
IF<A!N<) ) . GT. 1 , 0)  GO  TO  106 
CALL  SVEP< 12<  1,3) 

GO  TO  2 

FIND  FREQUENCV 

OVOLT=FVOLT 

CALL  AOUTd,  S,  OVOLT,  KERR) 

IFCKERR. ME. 1 ) PAUSE  7777 
CALL  HAI  KSO,  1,  MERR) 

IF<MEPR. HE. 1 ) PAUSE  1111 
NFL- STARTF+FTOL 
LFL=STAPTF-FTOL 
URnE(3)  CL 

WRITER,  101,  EPR^IOC,  EHI'.=  10e) 

UR  I TEC  3)  CT 

READ<3,  102,  EPr:=l06,  EMri=--106)  SVM,  VALUE 

Ft1ETER=VALUE.'  1 OOOOOO 

IF CFMETER. GT. UFL)  GO  TO  103 

irCF METER  LT. LFL)  GO  TO  104 

IFCNFR. EQ. 1 > GO  TO  45 

GO  TO  105 

FVOL r=FVOLT-. 004 

GO  TO  106 

rrOLT=FVOLT+  004 

GO  TO  106 


X=-10CiO. 

DO  4 1=1,600 

CALL  AIMHLCl, 7, F, KERF) 

IFCKERP  HE  1 ) Pause  7 

P = (P-1 . 5),-.  05 

IF<I.LE.400>  GO  TO  43 

DCI- j.OO)=P 

IFCP. LE. X)  GO  TO  36 

X=P 

CALL  STEPCO.  1,  5) 

CONTINUE 

JNUri  = JNUM  + l 


FIND  SMALLEST 
TRANSMISSION  LOSS  AT  THIS 
POSITION 


BEST  AVAilABLE  COPY 
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1 


i 

1 


C 


IJRITE<6,  55)  JNUtI- X 
IF<X. LE. XP)  GO  TO  5 
XP=X 

NPOS=JSTEP  • ■ 

5 URITE<5>  D 

1F< lEACK. HE. 0)  GO  TO  15 

FIND  NEXT  LONGITUDINAL 
POSITION 

1=0 

DO  10  J=1.LSTEP 
1 = 1 + 1 

CALL  STEP<  11-  1..  3) 

CALL  A I NHL (.2-  JIN,  AIN,  KERR) 
ir<KERF:.  NE.  1 ) PAUSE  506 
IF<1. NE. 10)  GO  TO  11 
CALL  STEPO,  1,0) 

1=0 

11  IF<  JSTEP.  Eli.  1 . AND.  J.  LT.  200)  GO  TO  6 
IF<AINa).GT  1.0)  PAUSE  1005 

€ IF(HItU2)  . GT.  1 . 0)  GO  TO  12 
10  CONTIIlUb' 

GO  TO  16 

12  IBACK=J 
WR1TE<G,57)  I BACK 

16  jsti:p= jSTep+i 

GO  TO  3 

RETURN  TO  LOWEST  TRANSMIS- 
SION LOSS  LONGITUDINAL 
POSITION 

15  WRITE (6, 63)  HPOS 
15  JNUM=HP03 

NSTOP=JS lEP-HPOS 
IFCNGTOP. EQ. 0>  GO  TO  IS 
L=0 


DO  1?  I1=1,HST0P 
NSTCP=LSTEP 
IF<M.EC>.  1)  NSTEP'-IBACK 
1=0 

DO  1?  J=1,NSTFF 
ir<L.LL  205)  L=L+1 
1 = 1 + 1 

CALL  STEP < 12, 1,3) 

CALL  AI(:HL<2,  J 1 N,  A I N,  KE?R  ) 
ir<KEK'r'  HE  1 ) PAUSE  506 
IF< I Nt . 10)  GO  TO  7 
CALL  STEP<?,  1,0 
I A) 

7 IF<L. LT . 200)  GO  TO  17 
TF <MPOS. EO. 1 ) GO  TO  17 

ir(.AIH<  1 ).  GT.  1 0 OR.  AIH';2).  GT.  1 . 0)  PAUSE  2222 
17  CONTINUE 
GO  TO  20 


IS  INDEX=-1 
. GO  TO  21 
20  NSTEP=600 

LS1EPX=IBACK+LSTEP 

IF<NSTOP. EO. 1 AND. lEACK. LT. 600)  NSTEP=IBACK 


IF<NSTOP  EQ.2  AND  LSTEPX. LT. 600) 
22  CALL  WaIT<  1,  2,  i!EPR) 

IF<MERF;.  NE.  1)  PhUSE  1111 
1=0 

DO  13  J=1,NSTEP 
1 = 1 + 1 


NSTEP+LSTEPX 

BBi  m\m  COPY 
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CALL  STEP<11,  1,3> 

CALL  A1I'IHL<2,  JIN.  AIH,  KERP.> 

IFCKERR. NE. 1 > PAUSE  506 
IF< I . NE. 10)  GO  TO  9 
CALL  SIEPO,  I,  0) 

1=0 

9 IFtUSTOP.  EC!.  1 , AND.  IBACK.  LE.  700)  GO  TO  13 
IFCIISTOr.  EQ.  2.  AMD.  LSTEPX.  LE.  700)  GO  TO  13 
IFCHPOS.  EO  1 . AHI!.  J.  LT.  200)  GO  TO  13 
IFCAINCl). GT. 1. 0. OP. AIM(2). GT. 1. 0)  PAUSE  4444 
13  COHTIHUE 
IHi)E>i  = 7 

Ksrcp=o 

IFCMPOS.  EQ.  1 > IMriEX  = 4 

IF<HPOS.  EQ.  2.  ANTi.  LSTFP.  L T . 600)  KSTEP=LSTEP-400 
IFCNSTOP. GT. 2)  GO  TO  21 

IFCHSTOP.EQ  1 . AUn. IBACK. GE. 600)  GO  TO  21 
IFCNSTOP.  EC!.  2.  AHIi.  L&TEPX.  GE.  600)  GO  TO  21 
IFCHSTOP. EO. 2)  GO  TO  19 
XIBACt.=  FLOAT  < I BACK  ) 

XH=XlBACK/'200 
IN1)EX  = 5+IHT<XM) 

I PACK=  I P ACK-POPt^  I 'IT  < XN  ) 

GO  TO  21 

19  XLSTEP  = FLOnT<;LSTEr'X> 

XH  = XLSTFp.-20Ti. 

INDEXES-*  II!T'::;H) 

LSTEPX  = LSTFPX-200  I I MT  ■•.  XN  ) 

FINi!  BEST  LONGITUDINAL 
POSITION 

21  NFR=1 

GO  TO  106 
45  XT=-100O. 

I«'PITE<6.  50) 

WRITE (6, 65)  INDEX 
DO  24  K=l, INDEX 
X=-1000. 

DO  23  1=1,400 

CALL  AIUHL<  1 . 7,  P..  KERR) 

IF<KERP.HE  1)  PAUSE  7 
P=<P-1 . 5)/. 05 
IFfl.LF  2U0)  GO  TO  TT 
D<I-100)=P 

44  ir<P. LE. X)  GO  TO  37 
X=P 

37  Call  STCc-O,  1,  5) 

23  CfNTlMUr 

UPITECk.  60)  I',.  X 
IF<X.LE.XT)  GO  TO  30 
XT=X 
NP0S1=K 
30  INJl24--;00 

irCXT.Gl.XP)  XP=XT 
WRITE<5)  D 

IF<K. EG. 1 . AND. NSTOP. EG. 1 . AND. IBACK. LT. COO)  IND24=IBACR 
IF<K  EG  l.AND  NSTOP. EG. 2. and. LSTEPX. LT. 600)  II{D24=LSTEPX 
ir<K.EO  1)  INI'EEP=1UD24 
IFCMPOS. EG. 1 and. K. EG. INDEX)  GO  TO  24 

IF<NPOS. EG. 2. AND.  I . EG.  INDEX. AND. LSTEP. LT. COO)  GO  TO  24 
IFCNPOS. EC. 2. AND. K. LG. IMDEX-1 . AND. LSTEP. LT. 600)  IND24-KSTEP 
WRITE (6/ 64)  IHD24 
11=0 


DO  49  J«l, IHD24 


BEST  AVAIUBLE  COPY 
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L 


c 


32 


49 

24 


33 

31 

14 

14 


29 


35 

25 

8 

27 

41 


M=h'+1 

CALL  STEP<12, 1, 3) 

CALL  AINHL<2. JIfL  AIN, KERR> 

IF<KERR. HE. 1 ) PAUSE  50C 
IF<M. HE. 10)  GO  TO  32 
CALL  STEP<9, 1,0) 

M=0 

IF<NPOS. EQ. 1 . AND. INDEX. ED. 4)  GO  TO  49 
IF<NPOS  EQ.  2.  AHD.  K.  EC!.  IHDEX-1  ) GO  TO  49 
IFCK.  LE.  2.  AND.  ttSTOP.  LE.  2)  GO  TO  49 
1F<K.  EC!.  INDEX.  AND.  LSTtP  LT  700)  GO  TO  49 


IF<AIN<1). GT  1 0. OP. AIHC2). GT. 1. 0)  PAUSE  3555 

CONTINUE 

CONTINUE 

NKEEP=0 

IFCNPOSl.CO. 1)  NKEEP=200-INKEEr 
NSTEP=^200*<;  INDEX+l-NPOSl  )-NKEEP 
IFCNPOS.EO. 1)  NSTEP=H9TEP-2O0 

IFCNPOS. EQ. 2. AND. XSTEP. NE. 0>  NSTEP=NSTEr-400+KSTEP 
IFCNSTCP. LT. e>  MSTEP=0 
IFCNSTEP  EO.0)  CO  TO  14 
1 = 0 

CALL  WAIK  1,  2,  I'lLPR) 

IFCHERR  NE. 1 > PAUSE  1111 
DO  31  K=1,NSTEP 
1 = 1 + 1 

CALL  STEPC 1 1, 13) 

CALL  AIrlHL<2,  ..UN,  AIN,  KERR) 
ir<KERR.  NE.  1 ) PfiUSE  506 
ir< I . NE. 10)  GO  TO  33 
CALL  STEr<9,  1,0) 

1=0 

1F<K.  LT.  200.  OR  fISTOf  LE  2)  GO  TO  31 
IFCAINCl). GT  1 0 OP. 01N<2). GT. 1 . 0)  PAUSE  6666 
CONTINUE 

Mr<ITE<6.61)  NPOSi,N',TEP 
JINDEX=l 

FIND  SMALLESr  TRANSMISSION 
LOSS 

X---10OO 
DO  25  1 = 1,  200 
CALL  AIMHI.C  1, 7,  P,  KEPP:) 

IFCKERR. NE. 1 > PAUSE  7 
P=<P-l . 5), . 05 
Dl< I )=P 

ir<P. LE. X)  GO  TO  ~S 
X = P 

ISTEP=I-1 
CaI.L  STEC<9,  1,5) 

CONTINUE 

ircx. LE. XP)  GO  TO  8 
XP  = X 

IF<J  INDEX.  EO  1 .>  GO  TO  27 
1F< ISTEP  EO  0)  GO  TO  27 
JINDEX=1 
HSTEP«195+ISTEP 
DO  41'  1 = 1,  HSTEP 
CALL  STEP<9,  1, 3) 

CONTINUE 
Ki  — leee 
DO  26  1-1,11 
call  UAITCl,  2,  riERR) 

IFCMERR. NE  1)  PAUSE  1111 


best  AVAIUBIE  COPY 


I 


L 

1 

L 

I 

I 

I 

f 
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C 


C 

C 


C 

c 

C 

c 

C 

C 

C 

C 

C 

C 

C 

c 

c 

c 

c 

c 

c 

c 

c 


c 

c 

c 

c 


CftLL  AINHL<1.  7- P,  KEPR) 

1F<KERR. NE. 1 ) PAUSE  7 

P=<P-1, 5)^. 05 

IF<P, LE. XI ) GO  TO  26 

X1=P 

ISTEP=I 

26  CALL  STEP<9, 1, 0> . 

IF<X1 . LE. MP)  GO  TO  42 
XP=Xl 

42  URITLCe, 62)  XI 

42  UR1TE<5)  II 

NSTEP=12-ISTEP 

CALL  STEPMO,  NSTEP.  3) 

JINDEX' JIHPEX+l 

IF< JINHEX. LE  2)  GO  TO  29 

28  CALL  AINHL< 1, 7, XPl,  ( EPP) 

IFtKERP  HE  1 ) PAUSE  7 
XP1=<XP1-1 . 5)y. 05 
WRITE <6, 74)  XPl 
WRITE(2  59)  FMETCP.  XP 
WRITE^e,  59)  FMETEF;.  XP 
URITE<4,76''  Fi1ETER,XP 

F VOL  T » F VOL  T -t-i:  F I ACRE  * } 7 . 5 )/•<  RANGEF  f 1 000 . > 

40  STARTr=STARTr+riHCRE 
ENUriLE  4 
EHUFILE  5 

51  FORMAT  <.FC.  0) 

52  FORMaKFT.S) 

53  FOkMAT< iX. 'ENTER  HO.  OF  LONG.  POSITIONS/WAVELEHGTH.  12’) 

54  F0RMAT<I2) 

55  FORMAT'' IX.  'AT  LOMGITUPIHaL  TOO  I T I ON ' ■ 1 3,  ' .•  X'^'/FS.S) 

56  FORMaTi.  IX,  TULl.  LONG ! TUH I HAL  I HCrutiCtIT  ',15,  ' STEPS') 

57  FORMAT < tx. 'CHn  OF  rORWARD  TRAVEL  RIACHEI'  IBACL=',T5) 

58  FORMAT<  IX,  'PETURli  TO  BEST  LONG  I TUP  1 ilAl . AREA  SOMn.  FTP  ' ) 

59  FORMAKIX,  'FRF'MJEMCV-',F?  0'  t1H2 ' , 'jX,  ' XP*' , F 8 . 3 ) 

60  FOPMnT(  IX,  ’EIHAL  IiTRAVlOH  I HTiCX- ' , 1 .2,  ' . X=',rf;.3'' 

61  FOEHaT<  IX,  ■ riHAL  LOHGITUDlXdL  POSITION  PEflCME'j.  HrOS-',I2,  ’ HSTE 
1R=' . 15) 

62  FORMAK  lOX,  'Xl  = ',  FS  3) 

63  FORMATUX.  'PETUPHniG  TO  LONGITUPTNAL  POS I T I ON' , I 3) 

64  FORMaTviX,  ’1NP.'4'*'’,  14) 

65  F0RMaT<2'3X,  ' INJifX---  , !2) 

6S  FORMAT<,.'^'PROGPAM  >+  LONG  IT  ♦+  ASSUMES  THE  FOLLOMItIG  OE'AUl.i-  V'l 
1 LUES,  1 OX,  ■ VAPlAni.E' , 9X.  ' PESCRIPTION' , 9X,  ' DFFiiULT  VALUE'  'IIX,  ' 
7STARTK',6X, 

2STaRT  FREOUEHCV',  IPX.  'NONE',UX,  ’S70PF',7X,  'STOP  FR  EC"  lEMr.  V ' . I'.'X,  'll 
30IIE'''11X,  • FIIICRC' . 6X,  'rPEOUCNCV  I NCPFMFHT  ' , S X.  '2  0 tULT'^UX  FI  OL ' 


4,  8X,  'rPEOl.iPilCY  TOLLPaNCE',  OX,  '0  2 MH2'  llX,  ’ PaHGEF  ' , C: :,  'MR 


FP 


5E0.  RANGE’,  SX,  '2  0 IIH7 1 1 X,  ’ MMovr. ',  TX,  ' SAMPLE'S  MAVLLEMGVh ',  9::,  ' 10 
6'  '/IX,  'IF  YOU  MISH  TO  CHmIICE  THE  PEFAULT  VALUES,  TYPE  " 1 “ . ' 

67  format  < ID 

68  FORNATCIX,  'ENTER  START  FREO  , IN  MHZ,  FS  8' ) 

69  FORMATC  IX,  'ENTER  STOP  FREl’UENCV,  IN  IIH2,F6.0') 

70  FORMATC IX, 'EIITEP  FREQUENCY  INCREMENT,  IN  MHZ,  F7  3') 

71  FORMAT< IX, 'ENTER  FPEOUEHCV  TOLERANCE,  IN  MH7,  F7.3') 

72  FORMATC IX, 'ENTER  HP  8690  FREO.  RANGE,  IN  GHZ,  F7  3') 

73  FORMAT-:  I 'NOMINAL  FROUEHC  Y«  ' , F7 . 0,  ' MHZ ',  5X,  ’ WAVELENGTH* ',  F7 . 3, 

1'  CEHT I METERS ' ) 


74  format  CSX, 'XPl*' , F8. 3) 

75  FORMATClHli 

76  FOPHATCZFlO.  .3) 

77  FORMAT-:  IX,  'ENTER  TAPE  MUM8EP,  13') 

78  FORMaTc IX,  'EHTER  FILE  HUMBER,  13’) 
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79  F0RMAT<I3) 

80  FORMAT< IX, 'ENTER  HUMBER  OF  FILES  TO  SKIP,  13') 

81  F0PMAT<2I3,  FIO. 3) 

101  FOPMAT< '5T0KM0M' ) 

102  F0RMAT«:fl2,  IX,  Ell  0> 

STOP 

END 

*LAP=  STEP 
»DBUG 

*TITL=  +++++  SUBROUTINE  STEP  +++++  SEPTEMBER  14,  1976 

SUBROUTINE  STKPCMkDD, NSTEP,  MUAIT> 

IF<NSTEP. EO. U>  RETURN 
no  1 IS=1,H3TEP 
TEN=10. 

CRLL  AOUT< 1, NftDD,  TEN,  K> 

IF  CK. NE. 1 > GO  TO  4 
CALL  lOAIT^  1,  1,  MERR> 

IFCMERR. NE. 1)  PAUSE  61111 
2ER0=0. 

CALL  AOUT< 1,  NADP,  2EPO,  K> 

IFCK. HE. 1 > GO  TO  h 
CALL  WAIT<NMAIT. 1, MERR) 

IF<MEPR. NE. 1 > PhUSE  61111 
1 CONTINUE 
RETUr-.M 

4 URITE<4, 51 > 

51  FORMAT< IX, 'SUBROUTINE  ++  STEP  ++  ERROR  RETURN') 
PAUSE  02222 
RETURN 
END 

ESTA  LOHGIT 
PR  10  9 

OPTI  0010  1001  1001  0000 

ASSI  1,  10,  2,  2,  3,  3F,  4,  55,  5,  85,  6,  62,  7,  0,  A,  83 

GET  200 

LOAD 

LINK  2C6 
EDIT  5C6 
MAP  62 
TASK  C? 

END 


1 


BtSI  WAlUBlt  COPY 
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FIGURE  D-4  FLOW  CHART  OF  ‘LONGON’  - LONGITUDINAL 
TRANSLATION  ONLY  COMPUTER  PROGRAM 
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«LABb  longon 
«DDUC 

$TITL=  + + + + + LONGON  •»•+  +++  OCTOBER  5. 

REAL  LFL 

niMEHSION  JIN<2), H1N<2> 

INTEGCR*2  SYN 

DATA  CL^'?vJ;(?',',  CT/'?<-E 

JIN<1)=5 

JIN<2)=g 

WRITE( 1.  53) 

RCAD<:i,54)  NSKJP 
CALL  FRFM<5< NSKIP> 

WRITE<1, 

REAIKl-Sv)  NTAPE 
UIRITEO.  50 
READ<J,54)  NFILE 
WRITE<l-5r) 

READ<1,5S)  S1ARTF 
UlRITEd,  55> 

READ<J,5S>  STOPF 

uRiTEd,  eo> 

READ<1,61>  FINCRE 
URITEi:  1.  S2) 

REAIi<l,61>  FTOL 
Ur<ITE<  1. 63.’ 

REAri<l,61>  RAllGEF 
IFCFIHCRE. EO.  0.  EO  FINCRE=1 . O 
I ND=l+<:STOrF-STARTr>.  FINCRE 
FV0LT=0. 0 

WRITE<5,  64>  NTAPE.  MFILE. STARTF 
DO  1 1 L-1, TND 
X = -10fi0. 

1^0 
J=tj 
K = 0 

4 CALL  AINHL<2,  JIN.  AIN. KERP) 
ir<KERR.  hi:.  1 '•  PPMAc;  506 
1 = 1 + 1 

1F<I  LT. 10>  GO  TO  1 
CALL  STEPO.  1, 0> 

1=0 

1 IF<J.LT.205)  J=J-H 
IF<J. LT. 2O0>  GO  TO  2 
IF(A1N<2). GT. 1. 0)  PhU3E  1 

2 IFEAIMC 1 > . GT  1.0)  GO  TO  3 
CALL  ■51  CP  a 2,  1.3) 

J--=J+1 
GO  10  4 

3 HFL=STAPTF +FTAL 
LFL=STARTF-FTOl. 

6 OVOLT».FVOLT 
11  = 0 

CALL  AOUTd.  8.  OVOLT.  Kf.PF:) 
IFCFERR.NE  1)  PAU'iE  T7r7 
CALL  WAIT ''50.  1.  MERR) 

IFCflERR  ME.  r>  PAUSE  1111 
UR  1TB':  3)  CL 

URlIEvS.  101.  ERR  = 3.  ENri  = 3> 

UPITE<3>  CT 

READ'S. 102. ERR=3. ENr=3>  SYM, VALUE 
FMETER=VALUE'1000000. 

IF<r METER. CT. HFL)  GO  TO  6 
IFCFMETER.LT  LFL)  GO  TO  7 
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GO  TO  5 

6 FVOLT=rVOLT-. 004 
GO  TO  3 

7 FVOLT=FVOLT+. 004 
GO  TO  3 

5 CALL  AIHHLC 1,  7,  P,  LEPR> 
iFCKERR. nr  1 ) PAySE  7 
P=(P-1.  5>''.  05 
IFCP. GT. X>  x=r 
CALL  STEP< 11,  1 , 0) 

CALL  ATEPC?,  1 . 1 :■ 

CALL  STEP < 10,  1,  0> 

CALL  A I NHL  <2,  JIN,  AIN-  t;EF;R> 
ir<KrK:R.  HE.  1 ) PhUSF  503 
IF<K.LT.205>  K-K+1 
If  CK.  I.  r.  200.1  GO  10  ■=' 

IF<hIN';1  >.  GT.  1 . Cj>  F ALICE  1005 
9 IFCAItK2>  . GT  . 1 . 0)  GO  TO  10 
M-M+1 

IF<M.GT.200)  GO  TO  A 
GO  TO  5 

10  UiPITEf.2,  51 1 FMETEF  . X 
WRIIECS,  52>  FMf.TEF:,.X 

FVOLT  = F VOLT  KriHi;r;E>t  17.  5)/'<F:ANGEF*1000.  > 

1 1 START  r:=STARTF  + FiNCf;E 
EHDFILE  5 

51  FnRMAT<lX,  'FPLOUF:!iCV=',  F7.  0,  ' MHZ',  5X,  'XP=',  F8.  3) 

52  rOFMtATCETlO.  3) 

53  FORMaT< IX,  'ENTER  MO  OF  FILES  TO  SKIP,  IS'l 

54  FORMAT  VIST 

55  FOrti.TTTlX,  't-HTEF.'  TARE  HO.,  13') 

53  format  < IX,  'ENTER  FILE  NO  ..  13') 

57  rORiTAT<  IX,  ' ENTER  STtiRIT,  IN  MHZ,  FC.  O') 

5 3 format 'irC  0) 

5.9  rORMATO:;,  'ENTER  STOPF.  ’M  MHZ,  FO  O') 

CO  FORMAT  • 'EMrER  FlilOFE,  IN  MHZ,  F7.3') 

Cl  FORliATTF?,  3) 

62  FORMAT^ IX,  ' enter  FTOL  IN  MHZ,  FT  3') 

63  FOKMATC I X,  ’ ENT F r NR3C90  FREQ.  RANGE,  IN  GHZ,  F7.3') 

64  F 0RMAT<2I3,  FIO.  .3) 

10  i FOFtlAT<"JTAKM0F;' ^ 

102  F OF  MAT'CA:;,  IX,  El  1 O) 

ST  OR 
END 


SLAP-  SFER 
SDPUG  « 

lTr7L=  SUf^OUT  INF  CEF  + + + + ♦ SEPTEMCL'P  14,  1976 


SMBPUUT  INI;  STFr'ClTTi'D-  NSTFP,  NWAIT) 
IF<NST'‘P.  CO.  0)  F ZVUril 
DO  1 IS=I,HSTT-P 
TFN=10. 

CALL  AOLIT<  1,  MAPD,  TEN,  K) 

IF  <K. HF . 1 ) GO  TO  4 
CALL  UAIKI,  1,  HER.'?:' 

I F < HERR . HE . I ) PAUSE  0 I 1 1 1 
?ER0--=0. 

CALL  AOUTC  1,  NADI',  ZEPO,  K) 

IF<K. NE. 1 ) GO  TO  4 
CALL  WAIT<NWAIT,  1,  HEPR) 

IF<HERR. HE. 1 4 PhUSE  01111 
1 CONTINUE 
PETURN 

4 URITEF4,51) 
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51  FORMAK IXi ' SUBROUTINE  ♦+  STEP  ++  ERROR  RETURN' > 
PAUSE  0?.?.ZZ 
RETURN 
END 

ESTA  LONGON 
PRIO  D 

OPTI  0010  1001  1001  00^0 
ASSI  1,  10/ S.  2.  3<  3F,  5,  35.  A,  83 
GET  200 
LOAD 

LINK  2CC 

EDIT  see. 

MAP  62 
TASK  EGG 
END 
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The  following  two  programs,  TPL0T2  and  RPL0T2,  plot  data  from  the  mag  tapes 
generated  from  the  data-gathering  programs.  TPL0T2  plots  the  transmission  loss, 
and  RPLOT  plots  reflection  coefficients. 
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$LfiB=  TPL0T2 
tDDUG 

ST1TL=  +++++  TPL0T2  +++++  OCTOBER  6.  1976 

BIMENSIOM  D1  Ct  14),  X <201  Y< 201  >,  7(201  ),  HSYt1(6> 

1, MSYM<6) 

EOUIVALEMCE  <ri (613),  NT0PE),  (D1 (614), HFILE) 

PilTA  SAnE-''9999.  /,  <HSYM(  I ),  1 = 1,  6)-'42,  30,  20,  31,  33,  35^ 

D0T0  (HSYtK  I ),  1 = 1,  6),'10752,  7680,  7168,  7936,  8443,  SSeO,' 

CALL  2Er;0(X,  201,  1,  1 ) 

CALL  2ER0(Y, 201,  1,  1 ) 

CALL  7EF;0(7,  201 , 1,1) 

YP0S=6. 0 

C WRITE (1,84) 

C READ<1,58)  NPEAK 

C I..IPITF(  1,  56) 

C REAIi(l,55)  HAVE 

C WRITE(1,57) 

C REAri(l,55)  HPLOT 

C UIRITE(1,60) 

C REAr(l,61)  F5TAPT 

CALL  M0riE(2,  9.  5,  3At'1E,  SAME) 

CALL  MODE <5, SAME, SAME, 44  1 . ) 

CALL  M 0 Ti E ( 7,  9 .0,7  0 , S A M E ) 

CALL  MODE (9, -35. , 5. , SAME) 

J=1 

C DO  3 J=l,Mf'LOT 

WRITEC 1, 58) 

RF.AIKl,  52)  MSKIP 
CALL  Fr-:FM(5,  HSkIP) 

DO  2 1=1,201 
5 READ  (5)  D1 

I K ( I . EO  1 ) FST ART= I HT  < D 1 < 60 1 ) + . 5 ) / 1 000 . 

C 6 )■'.  I )=Iil  (608) 

2(  1 ) = D1  '.  612) 

2 :'  ( I ) - Dl  <60  1 ).■  1000. 

IF(HA'v'E.  MC.  1 ) GO  TO  1 
CALL  NOTE(X.  Y,  USYM(.J),  -201  ) 

1 IF<HPEAK.  ME.  1 ) 00  TO  4 

CALL  M0DE(8, PSTpPT, . 025, SAME) 

CALL  HOTEO'.,  Z,  tISYtK  J>  . -201  ) 

4 CALL  M0TE(8.  1,  YP03,  ■■  TAPE  '.5) 

CALL  HOTE(S. C, YPOS,  HTAPE, 0) 

CALL  1iPhI.I(X1,  V 1 ..  - 1 , 0) 

CALL  nrnE<;;i,  vpos,  i ) 

CALL  DPAWO;!,  Yl  ..  -1..  0) 

CTjLL  MOTECd.  YP0S,  HFILF...  0) 

E T'  0 S = Y P'  D 5 + 0 5 

CAI  1.  NOTE(?.  25,  YPOS.  MSYM'OJ;,  1 ) 

3 YP03=YP0S-  25 
IFlHPEAl;..  HE.  1 ) GO  TO  7 
■.  41  L liOTE<S.  1, 6.  75,  'PEAK  POUEP',  10) 

7 IFdlAVE.  HE  1 ) iSO  TO  8 
CALL  HOTE'S.  1, 6.  5,  ' AVERAGE  POWER',  13) 

8 CALL . FORM <8,  1 . , 7,  1 . ) 

CALL  AXES(15  3,  'FREQUEHCY  ( GHZ  ) ' , 22 . 0,  ' TPAN3M I SS  I OH  LOS'S  (DB)') 
CALL  DRAW(0  ,0  1,9000) 

CALL  .DRAWCO,  0,  0.  ;'999) 

52  FORMAT (13) 

34  ruRMAT( IX, ' IF  YOU  WISH  PEAK  POWER,  TYPE  1') 

55  format  (ID 

56  FORMAT( IX, ' IF  YOU  WISH  AVERAGE  POWER,  TYPE  D) 

57  FORHAT< IX,  'CHTER  MO  OF  PLOTS  FTP  TAGE  III  THE  FORM  X.  MAX=6' ) 

58  FOPMATC IX, ' EH TEP  HO  OF  FILES  TO  SKIP,  IN  THE  FORM  XXXD 
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I 59  roRMtiTc i:<.  ' ir  this  is  iiimemsiohed  type  i') 

*'  60  ror<MHT<  ' ENTER  SThRT  frequency,  in  GHZ,  F7.3') 

61  F0RHHT<F7  3) 

CTor  . • 

ENP 

ESTH  TPLOTZ 
PRIO  5 

OPT  I 0010  1001  1001  0000 
OSSI  1,  10,  2,  t;z,  5,  85,  e,  Z,  3,  1 1C6 
GET  200 
LOOP 

LI  NR  1408 
EPIT  1408 
EPiT  res 
MHF  62 
TOOK  EC6 
ENP 
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fLftB-  RPL0T2 
*PBUr. 

»TITL«  ++♦++  RPL0T2  +++++  JULY  27,1976 

I)  1 MENS  I OH  Dl<614),Cab),X<2Ol),Y<201> 
EQUIVALENCE  <ril<G13),  NTAPE),  < D 1<  6 1 4 ) , NF I LE  ) 
DATA  SAME'????. 

VP0S=6.0 

CALL  ZEROCX,  201,  1,  1 ) 

CALL  2EF:0<Y,  201,  1,  1 ) 

CALL  MODETZ, 9. 5, SAME, SAME) 

CALL  MODE <5, SAME, SAME, 441  ) 

CALL  MODE <7, 9. 0, 5. 5, SAME) 

CALL  MODE (9, 0. 0, 0. 2, SAME) 

CALL  MODE ( 10, -1 , , SAME, SAME) 

DO  9 K3-1, 201, 100 
K2=K3+ 100 
LIRITE<  1, 50) 

READ':i,51)  NSKIP 
CALL  Ft,FM<5,  NSl-'IP) 

DO  6 K^l, 201 
READ<5, EMD=S)  D1 

IF(K.EQ.  1)  |-S  rART=IllTCDl  <601  ) + . 5)/1000. 
IF<K.EC!.1)  write <2,  57)  NTAPE,  NFIL  E 
X < K ) = < D 1 < 60 1 ) - . 0 ) / 1 000 . 

IE=1 

PEAK=-1000. 

DO  2 1=1,200 

IF<D1 < 1+400) . LT. PEAK)  GO  TO  2 
IF<D1 < 1+400)  . ME, PEAK)  GO  TO  3 
IE=IE+1 

IF  ( IE. GT. 10)  GO  TO  2 
GO  TO  4 

3 PEAK=D1<I+4O0) 

IE  = 1 

DO  1 M=l,  10 

1 C<M)=2. 

4 A=D1(I) 

B=D1 < 1+200) 

C( IE)=SORT<A+A+B+D) 

2 CONTI  HUE 
DO  5 J=l,  9 
J J=J+1 

DO  5 I=JJ, 10 
A+-C<  J) 

If  <c<  I ) . GE  a:'  go  to  5 
C( J)  = C<  I ) 

C < I )=A 

5 COMTIMliF 

IF  <C<2)  EQ. 2,  ) GO  TO  6 
WRITE <2, 53)  <C<  IE),  I E= 1 , 1 0 ), X<K ) 

6 Y<K)=C< 1 ) 

9 CONTINUE 
8 K'RITE<2,  56) 

CALL  M0DE<G, FSTAPT, . 025, SAME) 

CALL  PF:aI.KX,  Y,  201, 441  ) 

CALL  l!OIE<S  1,  YPOS,  ' TAPE  ',5) 

CALL  HOTE<S. 6, YPOS, NIhPE, 0) 

CALL  DRaI.K'XI,  Yl, -1, 0) 

CALL  NOTE':;:i,  YPOS,  ' - ' , 1 > 

CALL  DFaW'XI, VI, -1, 0) 

CALL  HOTECXl, YPOS, MFILE, 0) 

CALL  F0PH<1,  3.  , 1, 5.  > 

CALL  MODE< 10, 4369. , SAME, SAME) 
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CfiLL  FORtKS.  1 . < 5,  1 . ) 

CrtLL  ni:iDE<  10.  0 . SAME,  SAME> 

CALL  A>!ES(15.  3,  'FRE0UEHCV  < GHZ) 22.  2,  ' REFLECT  I OH  COEFF I C I EHT ' ) 
CALL  PRAHCO.  , 0,  , 1, 9000) 

CALL  DRAWCO,  0,  0,  9999) 

50  FORMATC IX, ' ENTER  HUMBER  OF  FILES  TO  SKIP,  13') 

51  FORMATCIS) 

53  FORMAT';  10F6.  2,  r7.  3) 

54  FORMAT< IX, ' GREATER  THAN  10') 

55  FORMAT';  It) 

5f.  FORMAT  ( nil  ) 

57  FOP  MAT < IX,  ' TAFE='  , 13,  5X,  'FILE=' , 13,  ,'/■) 

61  FORMAT 'IF?  3) 

CALL  FRFM(5, 1) 

STOP 

ENTi 

ESTA  RPL0T2 
PRIO  9 

OPT  I 0010  1001  1001  0000 

ASSI  1,  10,  2,  62,  3,  0,  5,  85,  6,  2,  8,  1 1C6 

GET  200 

LOAD 

LINK  14C6 
EDIT  niCc. 

EDIT  5L6 
NAP  62 
TASK  2C7 
END 
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